Ì i 2
adm.pat.ansi.elig.data (ansi.elig.data)
[elig.account,elig.ins,elig.ins.seq]
*AA.EDI[aa,ggm,aaEIS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
elig.account 30 URN L ADM.PAT aa
elig.ins 10 FREE L MIS.INS.DICT ggm
elig.ins.seq 5 FREE L aaEIS
elig.inq.override.dob 8 BDATE L *AA.EDI[aa,ggm,aaEIS]I|2
elig.inq.override.from.dt 8 DATE L *AA.EDI[aa,ggm,aaEIS]I|6
elig.inq.override.name 50 FREE L *AA.EDI[aa,ggm,aaEIS]I|0
elig.inq.override.phone 14 PHONE L *AA.EDI[aa,ggm,aaEIS]I|3
elig.inq.override.ssn 12 FREE L *AA.EDI[aa,ggm,aaEIS]I|1
elig.inq.override.thru.dt 8 DATE L *AA.EDI[aa,ggm,aaEIS]I|7
elig.inq.override.used 1 YN L *AA.EDI[aa,ggm,aaEIS]I|4
elig.resp.detail.exists 10 FREE L VAL=(>@ansi.elig.resp.detail[,,,""])
elig.txn.comment 50 FREE L *AA.EDI[aa,ggm,aaEIS]|6
elig.txn.edi.pgm 15 FREE L MIS.EDI.PGM *AA.EDI[aa,ggm,aaEIS]|8
elig.txn.inq.time 10 INT R *AA.EDI[aa,ggm,aaEIS]|1
elig.txn.ins.status 10 FREE L *AA.EDI[aa,ggm,aaEIS]|3
elig.txn.is.tpl.data 1 YN L *AA.EDI[aa,ggm,aaEIS]|10
elig.txn.mult.records 1 FREE L *AA.EDI[aa,ggm,aaEIS]|4
elig.txn.status 10 FREE L *AA.EDI[aa,ggm,aaEIS]|2
elig.txn.time 10 INT R *AA.EDI[aa,ggm,aaEIS]|7
elig.txn.trace.num 20 FREE L *AA.EDI[aa,ggm,aaEIS]|0
Ì € i 2
adm.pat.ansi.elig.tpl.links (ansi.elig.tpl.links)
[elig.account,elig.ins,elig.ins.seq, elig.tpl.ins]
*AA.EDI[aa,ggm,aaEIS]TPL[ggmL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
elig.tpl.ins 10 FREE L MIS.INS.DICT ggmL
elig.tpl.pointer 6 FREE L *AA.EDI[aa,ggm,aaEIS]TPL[ggmL]|0
Ì i 2
clinical.cus.defined.queries (ccdqr)
[ccdqr.patient,ccdqr.query]
*AA.CCDQR[aa,ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ccdqr.patient 30 URN L ADM.PAT aa
ccdqr.query 10 FREE L MIS.QUERY ggv
ccdqr.ctr 5 PINT R *AA.CCDQR[aa,ggv]|3
ccdqr.date 8 DATE L *AA.CCDQR[aa,ggv]|1
ccdqr.mult.ctr 5 PINT R *AA.CCDQR[aa,ggv]M|2
ccdqr.mult.date 8 DATE L *AA.CCDQR[aa,ggv]M|0
ccdqr.mult.qry.map.date 8 DATE L *AA.CCDQR[aa,ggv]INIT
ccdqr.mult.time 4 HHMM L *AA.CCDQR[aa,ggv]M|1
ccdqr.response 30 QRY.RESP L *AA.CCDQR[aa,ggv]|0
ccdqr.time 4 HHMM L *AA.CCDQR[aa,ggv]|2
Ì € i 2
clinical.cus.def.mult.qry.resp (ccdqr.mult.resp)
[ccdqr.patient,ccdqr.query, ccdqr.mult.seq.no]
*AA.CCDQR[aa,ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ccdqr.mult.seq.no 3 PINT R ggvN
ccdqr.mult.response 75 QRY.RESP L *AA.CCDQR[aa,ggv]M[ggvN]|0
Ì i 2
adm.pat.doctor.list (doctor.list)
[urn.2,any.doctor]
/DRS[aa,ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn.2 30 URN L ADM.PAT aa
any.doctor 10 FREE L MIS.DOC.DICT ggg
Ì i 2
adm.pat.edit.log (edit.log)
[ed.urn,ed.mnemonic,ed.date,ed.time,ed.seq.no]
*AAAG[aa,ag,aaDT,aaTM,aaEX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ed.urn 30 URN L ADM.PAT aa
ed.mnemonic 20 FREE L ADM.FIELDS ag
ed.date 8 DATE L aaDT
ed.time 4 HHMM L aaTM
ed.seq.no 2 PINT R aaEX
ed.new.value 40 FREE L *AAAG[aa,ag,aaDT,aaTM,aaEX]|1
ed.old.value 40 FREE L *AAAG[aa,ag,aaDT,aaTM,aaEX]|0
ed.user 10 FREE L MIS.USER *AAAG[aa,ag,aaDT,aaTM,aaEX]|2
Ì i 2
fastrax time range - last xmit (ft.save.range)
[save.p.type]
*AAFTZ.RNG[aazpt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
save.p.type 1 CHOICE L aazpt
save.auto.sec 20 INT R *AAFTZ.RNG[aazpt]|4
save.auto.urn 20 INT R *AAFTZ.RNG[aazpt]|5
save.b.date 6 FREE L *AAFTZ.RNG[aazpt]|0
save.b.time 4 INT R *AAFTZ.RNG[aazpt]|1
save.e.date 6 FREE L *AAFTZ.RNG[aazpt]|2
save.e.time 4 INT R *AAFTZ.RNG[aazpt]|3
Ì i 2
adm.pat.ins.ver.status.log (ins.ver.status.log)
[ins.vlog.user,ins.vlog.date,ins.vlog.ins,ins.vlog.account,ins.vlog.seq.no]
*AAISL[gu,aaslD,ggm,aa,aaISL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.vlog.user 10 FREE L MIS.USER gu
ins.vlog.date 8 DATE L aaslD
ins.vlog.ins 10 FREE L MIS.INS.DICT ggm
ins.vlog.account 30 URN L ADM.PAT aa
ins.vlog.seq.no 2 PINT R aaISL
ins.vlog.new.auth.pstatus 8 FREE L *AAISL[gu,aaslD,ggm,aa,aaISL]|3
ins.vlog.new.auth.status 9 FREE L *AAISL[gu,aaslD,ggm,aa,aaISL]|5
ins.vlog.new.elig.status 8 FREE L *AAISL[gu,aaslD,ggm,aa,aaISL]|1
ins.vlog.old.auth.pstatus 8 FREE L *AAISL[gu,aaslD,ggm,aa,aaISL]|2
ins.vlog.old.auth.status 9 FREE L *AAISL[gu,aaslD,ggm,aa,aaISL]|4
ins.vlog.old.elig.status 8 FREE L *AAISL[gu,aaslD,ggm,aa,aaISL]|0
ins.vlog.rpt.from.date 9 DATE L VAL=IF{b.ins.vlog.date'=@Z.del;"BEGINNING"}
ins.vlog.rpt.from.ins 10 FREE L VAL=IF{b.ins.vlog.ins'=@Z.del;"BEGINNING"}
ins.vlog.rpt.to.date 8 DATE L VAL=IF{e.ins.vlog.date'=@Z.del;"END"}
ins.vlog.rpt.to.ins 10 FREE L VAL=IF{e.ins.vlog.ins'=@Z.del;"END"}
Ì i 2
adm.pat.invalid.acct.log (invalid.acct.log)
[inv.date,inv.time,inv.urn]
:AAINV[aaDT,aaTM,aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inv.date 8 DATE L aaDT
inv.time 4 HHMM L aaTM
inv.urn 30 URN L aa
inv.account 12 FREE L :AAINV[aaDT,aaTM,aa]|1
inv.facility 10 FREE L :AAINV[aaDT,aaTM,aa]|5
inv.name 30 FREE L :AAINV[aaDT,aaTM,aa]|2
inv.status 8 FREE L :AAINV[aaDT,aaTM,aa]|3
inv.txn 10 FREE L :AAINV[aaDT,aaTM,aa]|0
inv.unit.number 10 FREE L :AAINV[aaDT,aaTM,aa]|4
inv.user 10 FREE L :AAINV[aaDT,aaTM,aa]|6
Ì i 2
adm.pat.locals (locals)
*AA
Field Name Len Dat Typ J DPM Offset/Local/VAL
acct.num.out 12 FREE L VAL=IF{@ADM.PAT.acct.number[urn];MRI.PAT.visit.subscri
VAL=pt#"2|"}
accts.prv.database 15 FREE L VAL=+@MIS.FACILITY.databases[@facility[IF{urn;@t.urn}]
VAL=,"PRV"]'>("PRV."_D(127))
age.out 7 FREE L VAL=IF{IF{@ADM.PAT.birthdate[urn];@t.MRI.PAT.computed.
VAL=birthdate[MRI.PAT.urn]}^DT IF{@t.MRI.PAT.exp.date^
VAL=DD %Z.age(DT,DD);%Z.age(DT)}}
allergy.lab 15 FREE L
appl.urn 30 URN L
birthdate.out 8 BDATE L VAL=IF{@ADM.PAT.birthdate[urn];@t.MRI.PAT.computed.bir
VAL=thdate[MRI.PAT.urn]}
choice 1 PINT R
copy 1 PINT R
delete.date 8 DATE L
device 25 FREE L
dis.date.out 8 FREE L VAL=IF{IF{@t.ADM.PAT.status%3="RCR" @t.ADM.PAT.recur.d
VAL=ischarge.date;@ADM.PAT.discharge.date[urn];@t.MRI.
VAL=PAT.visit.discharge.date[MRI.PAT.urn,MRI.PAT.visit
VAL=.subscript]}^DT %Z.date.out(DT)}
dis.disp.out 10 FREE L VAL=IF{@ADM.PAT.discharge.disposition[urn];@t.MRI.PAT.
VAL=discharge.disposition[MRI.PAT.urn]}
ed.or.del 1 FREE L
epi.num.out 15 FREE L VAL=epi.num.out
exit 1 PINT R
free 30 FREE L
free2 30 FREE L
free3 30 FREE L
hub.id 20 FREE L
ins.v.status 8 FREE L
ins.v.status.date 8 DATE L
int 2 PINT R
location.out 10 FREE L VAL=IF{@ADM.PAT.location[urn];@t.MRI.PAT.visit.locatio
VAL=n[MRI.PAT.urn,MRI.PAT.visit.subscript]}
midnight.run.date 8 DATE L
moved.to.acct.out 12 FREE L VAL=@ADM.PAT.acct.number[@ADM.PAT.moved.to[urn]]
mri.age.tested 1 FREE L
mri.bdat.tested 1 FREE L
mri.conflicts 1 YN L
mri.conflicts.tested 14 FREE L
mri.demo.recall 8 DATE L VAL=mri.demo.recall
mri.last.discharge 8 DATE L VAL=mri.last.discharge
mri.maiden.tested 1 FREE L
mri.moth.first.tested 1 FREE L
mri.name.tested 1 FREE L
mri.oth.pat.tested 1 FREE L
mri.other.name.tested 1 FREE L
mri.sex.tested 1 FREE L
mri.srch 1 CHOICE L
mri.title.tested 1 FREE L
name.out 30 FREE L VAL=IF{@ADM.PAT.name[urn];@t.MRI.PAT.name[MRI.PAT.urn]
VAL=}
new.pat 1 PINT R
occur.p.out 8 FREE L VAL=IF{@ADM.PAT.occur.date[urn,1]^DT %Z.date.out(DT)}
occur.s.out 8 FREE L VAL=IF{@ADM.PAT.occur.date[urn,2]^DT %Z.date.out(DT)}
rcr.last.date 8 DATE L VAL=-@ADM.PAT.recur.dates[@ADM.PAT.urn,""]
rcr.last.time 4 HHMM L VAL=-@ADM.PAT.recur.dates[@ADM.PAT.urn,@ADM.PAT.rcr.la
VAL=st.date,""]
resp.dr.name.out 30 FREE L VAL=IF{@ADM.PAT.attend.doctor[urn]^NM @MIS.DOC.DICT.na
VAL=me[NM];@ADM.PAT.er.doctor[urn]^NM @MIS.DOC.DICT.na
VAL=me[NM];@t.MRI.PAT.visit.doctor[MRI.PAT.urn,MRI.PAT
VAL=.visit.subscript]^NM @MIS.DOC.DICT.name[NM]}
resp.dr.out 10 FREE L VAL=IF{@ADM.PAT.attend.doctor[urn];@ADM.PAT.er.doctor[
VAL=urn];@t.MRI.PAT.visit.doctor[MRI.PAT.urn,MRI.PAT.v
VAL=isit.subscript]}
room.bed.urn 30 URN L ADM.PAT VAL=@ADM.PAT.room.bed.index[@.facility,ADM.PAT.room,AD
VAL=M.PAT.bed]
room.not.full 1 YN L VAL=%ADM.PAT.rm.not.full(MIS.ROOM.DICT.mnemonic)
room.not.full.or.all 1 YN L VAL=IF{L("Nn",c.yes.no)<2 "Y";@ADM.PAT.room.not.ful
VAL=l}
scrn.title 30 FREE L
select 2 PINT R
select2 2 INT R
sex.out 1 FREE L VAL=IF{@ADM.PAT.sex[urn];@t.MRI.PAT.sex[MRI.PAT.urn]}
stats.section 1 PINT R
status.out 8 FREE L VAL=IF{@ADM.PAT.status[urn];MRI.PAT.visit.subscript#"1
VAL=|"}
text.editor 0 FREE L
text.editor.view 0 FREE L
unit.num.out 10 FREE L VAL=IF{@ADM.PAT.unit.number[urn];/EA[MRI.PAT.urn,"UN",
VAL=@.mri.pfx]|0}
visit.date.out 8 FREE L VAL=IF{@ADM.PAT.admit.date[urn]^DT %Z.date.out(DT);@AD
VAL=M.PAT.service.date[urn]^DT %Z.date.out(DT);@ADM.PA
VAL=T.status#0A="PRE" "";(99999999-(MRI.PAT.visit.subs
VAL=cript#"0|"$8)<99999999)^DT %Z.date.out(DT)}
visit.time.out 4 FREE L VAL=IF{@ADM.PAT.admit.time[urn];@ADM.PAT.service.time[
VAL=urn];(9999-(MRI.PAT.visit.subscript#"0|"%8)<999
VAL=9)}
yes.no 1 YN L
yn 1 YN L
Ì i 2
adm.pat.location.list (location.list)
[urn.3,any.location]
/LOCS[aa,ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn.3 30 URN L ADM.PAT aa
any.location 10 FREE L MIS.LOCN.DICT ggn
Ì i 2
adm.patient.file (main)
[urn]
*AA[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 30 URN L aa
aaa.vip 1 YN L VAL=@vip
accident.24.hours 1 YN L *AA[aa]CNA|9
accident.comment 50 FREE L *AA[aa]CNF|1
accident.description 30 FREE L *AA[aa]CNA|8
accident.nature.of.injury 30 FREE L *AA[aa]CNA|7
accident.original.treat 50 FREE L *AA[aa]CNF|0
accident.place 10 FREE L MIS.ZCUS.IN.LOC*AA[aa]CNA|5
accident.police.involved 1 YN L *AA[aa]CNA|6
accommodation 10 FREE L MIS.ACCOM.DICT *AA[aa]B|5
acct 30 FREE L
acct.num.obs 12 FREE L VAL=IF{c.date'=@admit.date!(time'=@admit.time) ""^old.
VAL=can.number.seq.no,DO{@Next(old.can.number.seq.no)&
VAL=("ADM INo"'=@old.can.acct.status)},@old.can.acct.n
VAL=umber}
acct.num.obs.or.in 12 FREE L VAL=IF{"CANADA"'=@MIS.PARAM.country @acct.number;@acct
VAL=.num.obs;@acct.number}
acct.number 12 FREE L *AA[aa]|0
adm.or.mri.urn 6 FREE L
adm.res.date.out 8 DATE L VAL=IF{@admit.date;@reservation.date}
adm.res.time.out 4 HHMM L VAL=IF{@admit.time;@reservation.time}
adm.svc.age 7 FREE L VAL=(%Z.age(@ADM.PAT.computed.birthdate,IF{@admit.date
VAL=;@service.date}))
adm.svc.date.out 8 DATE L VAL=IF{@admit.date;@service.date}
adm.svc.res.date.out 8 DATE L VAL=IF{@admit.date;@service.date;@reservation.date;@tr
VAL=iage.date;@MRI.PAT.visit.date}
adm.svc.res.time.out 4 HHMM L VAL=IF{@admit.time;@service.time;@reservation.time;@tr
VAL=iage.time}
adm.svc.time.out 4 HHMM L VAL=IF{@admit.time;@service.time}
admit.clerk 10 FREE L MIS.USER *AA[aa]O3|0
admit.comment 50 FREE L *AA[aa]CO|0
admit.date 8 DATE L *AA[aa]|13
admit.diagnosis 55 FREE L *AA[aa]O3|11
admit.doctor 10 FREE L MIS.DOC.DICT *AA[aa]DR|0
admit.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.admit.doctor]
admit.priority 10 FREE L MIS.ADM.PRIORT *AA[aa]B|2
admit.source 10 FREE L MIS.ADM.SOURCE *AA[aa]B|8
admit.time 4 HHMM L *AA[aa]|14
admit.time.out 4 HHMM L VAL=IF{@admit.time;@t.MRI.PAT.visit.time}
affiliation 30 FREE L *AA[aa]A|1
age 7 AGE L *AA[aa]|8
age.group 2 FREE L *AA[aa]CND|5
alert.1 30 FREE L MIS.ZCUS.MED.AL*AA[aa]CNR[1]
alert.2 30 FREE L MIS.ZCUS.MED.AL*AA[aa]CNR[2]
allergy.1 30 FREE L *AA[aa]ALG[1]
allergy.2 30 FREE L *AA[aa]ALG[2]
allergy.3 15 FREE L *AA[aa]ALG[3]
allergy.4 15 FREE L *AA[aa]ALG[4]
alt.desc.group 15 FREE L *AA[aa]DX|1
ambulance 1 YN L *AA[aa]CNA|3
ambulance.call.number 11 INT R *AA[aa]T|8
anticipated.dis.date 8 DATE L VAL=%Z.date.add(@admit.date,@expected.length.of.stay)
arrived.from 10 FREE L MIS.ARRIV.DICT *AA[aa]O3|6
attend.doctor 10 FREE L MIS.DOC.DICT *AA[aa]DR|1
attend.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.attend.doctor;@t.MR
VAL=I.PAT.visit.doctor[MRI.PAT.urn,MRI.PAT.visit.subsc
VAL=ript]}]
attend.dr.mne.out 10 FREE L VAL=IF{@ADM.PAT.attend.doctor;@t.MRI.PAT.visit.doctor[
VAL=MRI.PAT.urn,MRI.PAT.visit.subscript]}
attend.or.er.doc.name.out 30 FREE L VAL=@MIS.DOC.DICT.name[IF{@ADM.PAT.attend.doctor;@ADM.
VAL=PAT.er.doctor}]
bed 3 FREE L *AA[aa]|11
bed.phone 10 FREE L VAL=@MIS.ROOM.DICT.bed.phone[@room,@bed]
birthdate 8 BDATE L *AA[aa]|5
birthdate.display.only 8 BDATE L *AA[aa]|5
blood.pressure 25 FREE L *AA[aa]T1|2
cd.screen.old 15 FREE L MIS.SCREEN *AA[aa]CD|0
ck.admit.priv 1 YN L VAL=IF{@MIS.PARAM.multi.fac="Y" IF{@MIS.DOC.DICT.facil
VAL=ity.admit.priv[@.new,@.facility];@MIS.DOC.DICT.dft
VAL=.admit.priv[@.new]};@MIS.DOC.DICT.dft.admit.priv[@
VAL=.new]}
ck.confidential 1 YN L VAL=IF{"Y"'=@ADM.PAT.confidential;@MIS.USER.confidenti
VAL=al.pts[@.user]="Y";"N"}
ck.location.facility 1 YN L VAL=IF{"Y"'=@MIS.PARAM.multi.fac "Y";+@MIS.LOCN.DICT.f
VAL=acilities[MIS.LOCN.DICT.mnemonic,""]_0=0 "Y";@MIS.
VAL=LOCN.DICT.facilities[MIS.LOCN.DICT.mnemonic,@.faci
VAL=lity] "Y";"N"}
ck.patient.facility 1 YN L VAL=IF{"Y"'=@MIS.PARAM.multi.fac "Y";@ADM.PAT.facility
VAL=!.=@.facility "Y";"N"}
ck.room.facility 1 YN L VAL=IF{"Y"'=@MIS.PARAM.multi.fac "Y";+@MIS.ROOM.DICT.f
VAL=acilities[MIS.ROOM.DICT.mnemonic,""]_0=0 "Y";@MIS.
VAL=ROOM.DICT.facilities[MIS.ROOM.DICT.mnemonic,@.faci
VAL=lity] "Y";"N"}
ck.service.facility 1 YN L VAL=IF{"Y"'=@MIS.PARAM.multi.fac "Y";+@MIS.SVC.DICT.fa
VAL=cilities[MIS.SVC.DICT.mnemonic,""]_0=0 "Y";@MIS.SV
VAL=C.DICT.facilities[MIS.SVC.DICT.mnemonic,@.facility
VAL=] "Y";"N"}
ck.short.form.reg 1 YN L VAL=IF{@short.form.reg;"N"}
cli.depart.comment 50 FREE L *AA[aa]CLI|4
cli.depart.date 8 DATE L *AA[aa]CLI|0
cli.depart.diagnosis 50 FREE L *AA[aa]CLI|3
cli.depart.disposition 10 FREE L MIS.DIS.DICT *AA[aa]CLI|2
cli.depart.time 4 HHMM L *AA[aa]CLI|1
computed.birthdate 8 BDATE L *AA[aa]|6
cond.comment 60 FREE L *AA[aa]CN|4
cond.date 8 DATE L *AA[aa]CN|2
cond.time 4 HHMM L *AA[aa]CN|3
confidential 1 YN L *AA[aa]O4|0
confidential.comment 50 FREE L *AA[aa]O4|1
confidential.message 25 FREE L VAL=@ADM.PARAM.confidential.message
current.age 7 FREE L VAL=(%Z.age(@ADM.PAT.computed.birthdate))
date 8 DATE L
decision.to.admit.date 8 DATE L *AA[aa]T|9
decision.to.admit.time 4 TIME L *AA[aa]T|7
deleted 1 YN L *AA[aa]|19
depart.comment 50 FREE L *AA[aa]DEP|4
depart.date 8 DATE L *AA[aa]DEP|0
depart.diagnosis 50 FREE L *AA[aa]DEP|3
depart.disposition 10 FREE L MIS.DIS.DICT *AA[aa]DEP|2
depart.time 4 HHMM L *AA[aa]DEP|1
discharge.comment 55 FREE L *AA[aa]CO|2
discharge.date 8 DATE L *AA[aa]|17
discharge.diagnosis 55 FREE L *AA[aa]O3|12
discharge.disposition 10 FREE L MIS.DIS.DICT *AA[aa]B|14
discharge.time 4 HHMM L *AA[aa]|18
do.mpi.search 1 YN L *AA[aa]O4|9
doctor 10 FREE L MIS.DOC.DICT
doctor.group 10 FREE L MIS.DOC.GRP
doctor.out 10 FREE L MIS.DOC.DICT VAL=IF{@admit.doctor;@attend.doctor;@er.doctor}
edit.or.switch.guar.num 1 CHOICE L *AA[aa]A|8
effective.date 8 DATE L
emp.addr.phone.out 125 FREE L VAL=(@pt.emp^AD#2P_IF{AD|3 " "_AD|3}_","_AD|4_","_AD|5
VAL=_" "_AD|6_" "_AD|7'=",, ")
emp.address.out 106 FREE L VAL=(@pt.emp^AD#2P_IF{AD|3 " "_AD|3}_","_AD|4_","_AD|5
VAL=_" "_AD|6'=",, ")
emp.city 30 FREE L *AA[aa]E|4
emp.city.state.zip.o 44 FREE L VAL=(@pt.emp^AD#4P_","_AD|5_" "_AD|6'=", ")
emp.name.out 30 FREE L VAL=IF{@MIS.EMPLR.DICT.name[@employer];@employer}
emp.phone 18 PHONE L *AA[aa]E|7
emp.postal.code 10 ZIP.POST L *AA[aa]E|6
emp.province 20 FREE L *AA[aa]E|5
emp.state 20 FREE L *AA[aa]E|5
emp.street 30 FREE L *AA[aa]E|2
emp.street2 30 FREE L *AA[aa]E|3
emp.streets.out 61 FREE L VAL=(@pt.emp^AD#2P_" "_AD|3'=" ")
emp.zip 10 ZIP.POST L *AA[aa]E|6
employer 10 FREE L MIS.EMPLR.DICT *AA[aa]E|0
employer.name 30 FREE L VAL=IF{@MIS.EMPLR.DICT.name[@employer];@employer}
entry.code 10 FREE L MIS.CAN.ENTRY *AA[aa]CNA|1
er.depart.comment 50 FREE L *AA[aa]ER|4
er.depart.date 8 DATE L *AA[aa]ER|0
er.depart.diagnosis 50 FREE L *AA[aa]ER|3
er.depart.disposition 10 FREE L MIS.DIS.DICT *AA[aa]ER|2
er.depart.time 4 HHMM L *AA[aa]ER|1
er.doctor 10 FREE L MIS.DOC.DICT *AA[aa]DR|4
er.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.er.doctor]
existing.illness 50 FREE L *AA[aa]T|2
expected.length.of.stay 3 PINT R *AA[aa]O3|5
facility 10 FREE L MIS.FACILITY *AA[aa]B|7
facility.val 10 FREE L MIS.FACILITY VAL=IF{"Y"'=@MIS.PARAM.multi.fac .;@ADM.PAT.main @ADM.
VAL=PAT.facility!.;""^PFX^P,0^I,DO{@MRI.PAT.visit.acct
VAL=.number#I'?1N^P PFX_P^PFX,I+1^I},PFX @MIS.PARAM.ac
VAL=ct.num.px.facility[PFX]}
family.doctor 10 FREE L MIS.DOC.DICT *AA[aa]DR|3
family.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.family.doctor]
family.doctor.name.out 30 FREE L VAL=IF{@MIS.DOC.DICT.name[@family.doctor];@family.doct
VAL=or}
financial.class 10 FREE L MIS.FIN.CLASS *AA[aa]A|3
first.name 30 FREE L
grouper.version 10 FREE L *AA[aa]DX|0
guar.addr.phone.out 115 FREE L VAL=(@guar^AD#2P_IF{AD|3 " "_AD|3}_","_AD|4_","_AD|5_"
VAL= "_AD|6_" "_AD|7'=",, ")
guar.address.out 96 FREE L VAL=(@guar^AD#2P_IF{AD|3 " "_AD|3}_","_AD|4_","_AD|5_"
VAL= "_AD|6'=",, ")
guar.city 20 FREE L *AA[aa]G|4
guar.city.state.zip.o 34 FREE L VAL=(@guar^AD#4P_","_AD|5_" "_AD|6'=", ")
guar.emp.addr.phone.out 125 FREE L VAL=(@guar.emp^AD#2P_IF{AD|3 " "_AD|3}_","_AD|4_","_AD
VAL=|5_" "_AD|6_" "_AD|7'=",, ")
guar.emp.address.out 106 FREE L VAL=(@guar.emp^AD#2P_IF{AD|3 " "_AD|3}_","_AD|4_","_AD
VAL=|5_" "_AD|6'=",, ")
guar.emp.city 30 FREE L *AA[aa]GE|4
guar.emp.city.state.zip.o 44 FREE L VAL=(@guar.emp^AD#4P_","_AD|5_" "_AD|6'=", ")
guar.emp.name.out 30 FREE L VAL=IF{@MIS.EMPLR.DICT.name[@guar.employer];@guar.empl
VAL=oyer}
guar.emp.phone 18 PHONE L *AA[aa]GE|7
guar.emp.postal.code 10 ZIP.POST L *AA[aa]GE|6
guar.emp.province 2 FREE L *AA[aa]GE|5
guar.emp.state 2 FREE L *AA[aa]GE|5
guar.emp.street 30 FREE L *AA[aa]GE|2
guar.emp.street2 30 FREE L *AA[aa]GE|3
guar.emp.streets.out 61 FREE L VAL=(@guar.emp.street_" "_@guar.emp.street2'=" ")
guar.emp.zip 10 ZIP.POST L *AA[aa]GE|6
guar.employer 10 FREE L MIS.EMPLR.DICT *AA[aa]GE|0
guar.home.phone 18 PHONE L *AA[aa]G|7
guar.name 30 FREE L *AA[aa]G|0
guar.name.display.only 30 FREE L *AA[aa]G|0
guar.name.pre.er 30 FREE L *AA[aa]G|0
guar.occupation 20 FREE L *AA[aa]GE|1
guar.postal.code 10 ZIP.POST L *AA[aa]G|6
guar.province 2 FREE L *AA[aa]G|5
guar.pt.relationship 10 FREE L MIS.RELAT.DICT *AA[aa]G|1
guar.soc.sec.number 12 FREE L *AA[aa]G|8
guar.state 20 FREE L *AA[aa]G|5
guar.street 30 FREE L *AA[aa]G|2
guar.street.display.only 30 FREE L *AA[aa]G|2
guar.street2 30 FREE L *AA[aa]G|3
guar.streets.out 61 FREE L VAL=(@guar.street_" "_@guar.street2'=" ")
guar.zip 10 ZIP.POST L *AA[aa]G|6
hc.subscriber.inits 3 FREE L *AA[aa]CND|2
hc.subscriber.relation 10 FREE L MIS.RELAT.DICT *AA[aa]CND|3
health.care.number 10 NHS.NUM L *AA[aa]CND|1
hospital.number 4 INT R *AA[aa]CNA|4
id 30 URN L ADM.PAT VAL=(@acct.number_" "_@name:0S)
inpatient.location 10 FREE L MIS.LOCN.DICT *AA[aa]|12
ins.addr.phone.out 130 FREE L VAL=(IF{"Y"'=@MIS.INS.DICT.other.type @MIS.INS.DICT.ad
VAL=dress2^ADDR2,@MIS.INS.DICT.main^AD#2P_IF{ADDR2 " "
VAL=_ADDR2}_","_AD|3_","_AD|4_" "_AD|5_" "_AD|6;@insur
VAL=ances^AD#0P_IF{AD|6 " "_AD|6}_","_AD|1_","_AD|2_"
VAL="_AD|3_" "_AD|4}'=",, ")
ins.address.out 65 FREE L VAL=(IF{"Y"'=@MIS.INS.DICT.other.type @MIS.INS.DICT.ad
VAL=dress2^ADDR2,@MIS.INS.DICT.main^AD#2P_IF{ADDR2 " "
VAL=_ADDR2}_","_AD|3_","_AD|4_" "_AD|5;@insurances^AD#
VAL=0P_IF{AD|6 " "_AD|6}_","_AD|1_","_AD|2_" "_AD|3}'=
VAL=",, ")
ins.city.out 20 FREE L VAL=IF{@insurance.city;@MIS.INS.DICT.city}
ins.mnemonic.1 10 FREE L VAL=@insurance.mnemonic[1]^insurance
ins.mnemonic.2 10 FREE L VAL=@insurance.mnemonic[2]^insurance
ins.mnemonic.3 10 FREE L VAL=@insurance.mnemonic[3]^insurance
ins.mnemonic.4 10 FREE L VAL=@insurance.mnemonic[4]^insurance
ins.name.out 30 FREE L VAL=IF{@MIS.INS.DICT.other.type="Y" IF{@insurance.othe
VAL=r.name;@MIS.INS.DICT.name};@MIS.INS.DICT.name}
ins.name.out.1 30 FREE L VAL=IF{@ins.mnemonic.1 @ins.name.out}
ins.name.out.2 30 FREE L VAL=IF{@ins.mnemonic.2 @ins.name.out}
ins.name.out.3 30 FREE L VAL=IF{@ins.mnemonic.3 @ins.name.out}
ins.name.out.4 30 FREE L VAL=IF{@ins.mnemonic.4 @ins.name.out}
ins.number.1 1 INT R VAL=1
ins.number.2 1 INT R VAL=2
ins.number.3 1 INT R VAL=3
ins.number.4 1 INT R VAL=4
ins.phone.out 18 PHONE L VAL=IF{@insurance.phone;@MIS.INS.DICT.phone}
ins.pol.no.out.1 30 FREE L VAL=@insured.policy.number[,@ins.mnemonic.1]
ins.pol.no.out.2 30 FREE L VAL=@insured.policy.number[,@ins.mnemonic.2]
ins.pol.no.out.3 30 FREE L VAL=@insured.policy.number[,@ins.mnemonic.3]
ins.pol.no.out.4 30 FREE L VAL=@insured.policy.number[,@ins.mnemonic.4]
ins.state.out 2 FREE L VAL=IF{@insurance.state;@MIS.INS.DICT.state}
ins.street.out 30 FREE L VAL=IF{@insurance.street;@MIS.INS.DICT.address}
ins.street2.out 30 FREE L VAL=IF{@insurance.street2;@MIS.INS.DICT.address2}
ins.zip.out 10 FREE L VAL=IF{@insurance.zip;@MIS.INS.DICT.zip}
institution.from 10 FREE L MIS.CAN.INST *AA[aa]CNA|2
is.admitting.doctor 1 FREE L VAL=IF{ADM.PAT.doctor=@ADM.PAT.admit.doctor "Y"}
is.attend.or.er.doctor 1 FREE L VAL=IF{ADM.PAT.doctor=@ADM.PAT.attend.doctor "Y";ADM.P
VAL=AT.doctor=@ADM.PAT.er.doctor "Y"}
is.attending.doctor 1 FREE L VAL=IF{ADM.PAT.doctor=@ADM.PAT.attend.doctor "Y"}
is.er.doctor 1 FREE L VAL=IF{ADM.PAT.doctor=@ADM.PAT.er.doctor "Y"}
is.family.doctor 1 FREE L VAL=IF{ADM.PAT.doctor=@ADM.PAT.family.doctor "Y"}
is.other.doctor 1 FREE L VAL=IF{ADM.PAT.doctor=@ADM.PAT.other.doctor "Y"}
lab.suppress.pci 1 YN L *AA[aa]LD|0
language 10 FREE L MIS.CAN.LANG *AA[aa]CND|0
last.discharge.date 8 DATE L VAL=IF{%ADM.PAT.mri.last.dis(@ADM.PAT.mri.urn,ADM.PAT.
VAL=urn),/mri.last.discharge}
last.edit.date 8 DATE L VAL=%Z.date.in.magic(@ADM.PAT.last.edit.time)
last.edit.time 9 FREE L *AA[aa]B|0
last.edit.time.of.day 4 HHMM L VAL=%Z.time.out(@ADM.PAT.last.edit.time)
last.edit.user 10 FREE L MIS.USER *AA[aa]B|1
last.hosp.from.date 8 DATE L *AA[aa]B|12
last.hosp.thru.date 8 DATE L *AA[aa]B|13
last.hospital 30 FREE L *AA[aa]B|11
last.hospital.and.dates 48 FREE L VAL=(@last.hospital_" "_%Z.date.out(@last.hosp.from.da
VAL=te)_"-"_%Z.date.out(@last.hosp.thru.date)'=" -")
last.inpat.visit.date 8 DATE L VAL=IF{@mri.urn %ADM.PAT.mri.last.visit(urn,"I")#0P}
last.name 30 FREE L
last.outpat.visit.date 8 DATE L VAL=IF{@mri.urn %ADM.PAT.mri.last.visit(urn,"O")#0P}
last.outpat.visit.type 3 CHOICE L VAL=IF{@mri.urn %ADM.PAT.mri.last.visit(urn,"O")#1P}
last.tetanus 25 FREE L *AA[aa]T1|0
last.visit.date 8 DATE L VAL=IF{@mri.urn %ADM.PAT.mri.last.visit(urn)#0P}
last.visit.type 3 CHOICE L VAL=IF{@mri.urn %ADM.PAT.mri.last.visit(urn)#1P}
length.of.stay 3 PINT R VAL=IF{@discharge.date %Z.date.sub(@discharge.date,@ad
VAL=mit.date)!1}
length.of.stay.so.far 4 PINT R VAL=(%Z.date.sub(IF{@discharge.date;@.today},@admit.da
VAL=te)!1)
load.doctor.list 1 YN L VAL=%ADM.PAT.load.docs(ADM.PAT.urn)
load.location.list 1 YN L VAL=%ADM.PAT.load.locs(ADM.PAT.urn,ADM.PAT.time)
location 10 FREE L MIS.LOCN.DICT *AA[aa]|12
maiden.other.name 30 NAME L *AA[aa]B|4
marital.status 10 FREE L MIS.MAR.STATUS *AA[aa]A|4
medications 50 FREE L *AA[aa]T|3
mothers.first.name 20 FREE L *AA[aa]B|3
mothers.first.name.out 20 FREE L VAL=IF{@ADM.PAT.mothers.first.name[urn];@t.MRI.PAT.mot
VAL=hers.first.name[MRI.PAT.urn]}
mothers.urn 30 URN L ADM.PAT *AA[aa]O3|9
moved.to 30 FREE L *AA[aa]O4|8
mri.drc.patient 30 FREE L
mri.urn 25 URN L MRI.PAT *AA[aa]|4
name 30 FREE L *AA[aa]|1
name.w.vip.flag 30 FREE L VAL=(IF{@ADM.PAT.vip="Y" @ADM.PARAM.vip.flag}_@ADM.PAT
VAL=.name)
new.acct 30 FREE L
newborn.admit.source 10 FREE L MIS.NEWBORN *AA[aa]B|9
nok.addr.phone.out 138 FREE L VAL=(@next.of.kin^AD#1P_IF{AD|2 " "_AD|2}_","_AD|3_","
VAL=_AD|4_" "_AD|5_IF{AD|6 " H:"_AD|6}_IF{AD|7 " B:"_A
VAL=D|7}'=",, ")
nok.address.out 96 FREE L VAL=(@next.of.kin^AD#1P_IF{AD|2 " "_AD|2}_","_AD|3_","
VAL=_AD|4_" "_AD|5'=",, ")
nok.city 20 FREE L *AA[aa]NK|3
nok.city.state.zip.o 34 FREE L VAL=(@next.of.kin^AD#3P_","_AD|4_" "_AD|5'=", ")
nok.home.phone 18 PHONE L *AA[aa]NK|6
nok.name 30 FREE L *AA[aa]NK|0
nok.name.display.only 30 FREE L *AA[aa]NK|0
nok.postal.code 10 ZIP.POST L *AA[aa]NK|5
nok.province 2 FREE L *AA[aa]NK|4
nok.relationship 10 FREE L MIS.RELAT.DICT *AA[aa]NK|8
nok.state 20 FREE L *AA[aa]NK|4
nok.street 30 FREE L *AA[aa]NK|1
nok.street.display.only 30 FREE L *AA[aa]NK|1
nok.street2 30 FREE L *AA[aa]NK|2
nok.streets.out 61 FREE L VAL=(@nok.street_" "_@nok.street2'=" ")
nok.work.phone 18 PHONE L *AA[aa]NK|7
nok.zip 10 ZIP.POST L *AA[aa]NK|5
notify.addr.phone.out 138 FREE L VAL=(@per.to.notify^AD#1P_IF{AD|2 " "_AD|2}_","_AD|3_"
VAL=,"_AD|4_" "_AD|5_IF{AD|6 " H:"_AD|6}_IF{AD|7 " B:"
VAL=_AD|7}'=",, ")
notify.address.out 96 FREE L VAL=(@per.to.notify^AD#1P_IF{AD|2 " "_AD|2}_","_AD|3_"
VAL=,"_AD|4_" "_AD|5'=",, ")
notify.city 20 FREE L *AA[aa]PN|3
notify.city.state.zip.o 34 FREE L VAL=(@per.to.notify^AD#3P_","_AD|4_" "_AD|5'=", ")
notify.home.phone 18 PHONE L *AA[aa]PN|6
notify.name 30 FREE L *AA[aa]PN|0
notify.name.display.only 30 FREE L *AA[aa]PN|0
notify.postal.code 10 ZIP.POST L *AA[aa]PN|5
notify.province 2 FREE L *AA[aa]PN|4
notify.relationship 10 FREE L MIS.RELAT.DICT *AA[aa]PN|8
notify.state 20 FREE L *AA[aa]PN|4
notify.street 30 FREE L *AA[aa]PN|1
notify.street.display 30 FREE L *AA[aa]PN|1
notify.street2 30 FREE L *AA[aa]PN|2
notify.streets.out 61 FREE L VAL=(@notify.street_" "_@notify.street2'=" ")
notify.work.phone 18 PHONE L *AA[aa]PN|7
notify.zip 10 ZIP.POST L *AA[aa]PN|5
number.and.name 44 FREE L VAL=(IF{O(*)=O(?) @MRI.PAT.unit.number_" "_@MRI.PAT.n
VAL=ame;@acct.number_" "_@name}:0S)
number.name.and.status 55 FREE L VAL=(IF{O(*)=O(?) @MRI.PAT.unit.number_" "_@MRI.PAT.n
VAL=ame;IF{@acct.number;"NEW"}_" "_@name_" ["_@statu
VAL=s.w.obsv_"]"}:0S)
nursing.assessment 50 FREE L *AA[aa]T|4
nursing.assessment.1 50 FREE L *AA[aa]T|5
observation.patient 1 FREE L *AA[aa]O3|10
observation.patient.date 8 DATE L *AA[aa]O4|2
observation.patient.time 4 HHMM L *AA[aa]O4|4
occupation 20 FREE L *AA[aa]E|1
old.health.care.number 14 FREE L *AA[aa]CND|6
omit.discharged 1 YN L VAL=IF{"Y"'=c.yn;@status#0A'="DIS"'="DEP" "Y";"N"}
oth.fam.mem 1 YN L *AA[aa]O4|5
other.doctor 10 FREE L MIS.DOC.DICT *AA[aa]DR|2
other.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.other.doctor]
other.doctor.name.out 30 FREE L VAL=IF{@MIS.DOC.DICT.name[@other.doctor];@other.doctor
VAL=}
outpatient.location 10 FREE L MIS.LOCN.DICT *AA[aa]|12
outpatient.prior.location 10 FREE L MIS.LOCN.DICT *AA[aa]|21
outpatient.service 10 FREE L MIS.SVC.DICT *AA[aa]|20
outpatient.service.name 30 FREE L VAL=@MIS.SVC.DICT.name[@outpatient.service]
pat.city 20 FREE L *AA[aa]AD|2
pat.home.phone 18 PHONE L *AA[aa]AD|5
pat.home.phone.out 18 FREE L VAL=IF{@ADM.PAT.pat.home.phone[urn];@t.MRI.DRC.pat.hom
VAL=e.phone[MRI.PAT.urn]}
pat.other.phone 18 PHONE L *AA[aa]AD|6
pat.postal.code 10 ZIP.POST L *AA[aa]AD|4
pat.province 20 FREE L *AA[aa]AD|3
pat.state 20 FREE L *AA[aa]AD|3
pat.street 30 FREE L *AA[aa]AD|0
pat.street2 30 FREE L *AA[aa]AD|1
pat.zip 10 ZIP.POST L MIS.ZIP *AA[aa]AD|4
patient.address.out 96 FREE L VAL=(@pt.addr^AD#0P_IF{AD|1 " "_AD|1}_","_AD|2_","_AD|
VAL=3_" "_AD|4'=",, ")
patient.address.phone.out 115 FREE L VAL=(@pt.addr^AD#0P_IF{AD|1 " "_AD|1}_","_AD|2_","_AD|
VAL=3_" "_AD|4_" "_AD|5'=",, ")
patient.city.state.zip.o 34 FREE L VAL=(IF{@pt.addr;@t.MRI.DRC.pt.addr[MRI.PAT.urn]}^AD#2
VAL=P_", "_AD|3_" "_AD|4'=", ")
patient.streets.out 61 FREE L VAL=(@pat.street_" "_@pat.street2'=" ")
previous.acct.num 12 FREE L VAL=@old.can.acct.number[@Last(old.can.number.seq.no)]
previously.inpatient 1 YN L VAL=%ADM.PAT.prev.inp(urn)
prim.care.doctor 10 FREE L MIS.DOC.DICT *AA[aa]DR|5
prim.care.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.prim.care.doctor]
prim.care.doctor.name.out 30 FREE L VAL=@MIS.DOC.DICT.name[@ADM.PAT.prim.care.doctor]
print.cd.screen 0 FREE L VAL=IF{urn^/urn,DO{@Next(cd.screen) %MIS.SCREEN.print(
VAL=cd.screen,^@customer.defined.fields,"",0)}}
print.cd.screen.verbatim 0 FREE L VAL=IF{urn^/urn,DO{@Next(cd.screen) %MIS.SCREEN.print(
VAL=cd.screen,^@customer.defined.fields,1,0)}}
prior.outpt.status 8 FREE L *AA[aa]O3|13
pt.city.out 20 FREE L VAL=IF{@ADM.PAT.pat.city[urn];@t.MRI.DRC.pat.city[MRI.
VAL=PAT.urn]}
pt.condition 1 FREE L ADM.COND *AA[aa]CN|0
pt.street.out 30 FREE L VAL=IF{@ADM.PAT.pat.street[urn];@t.MRI.DRC.pat.street[
VAL=MRI.PAT.urn]}
pt.street2.out 30 FREE L VAL=IF{@ADM.PAT.pat.street2[urn];@t.MRI.DRC.pat.street
VAL=2[MRI.PAT.urn]}
pulse 25 FREE L *AA[aa]T1|3
race 10 FREE L MIS.RACE.DICT *AA[aa]A|5
race.out 10 FREE L VAL=IF{@ADM.PAT.race[urn];@t.MRI.DRC.race[MRI.PAT.urn]
VAL=}
rcr.link.to.new 30 FREE L *AA[aa]O4|7
rcr.link.to.old 30 FREE L *AA[aa]O4|6
reason.for.visit 50 FREE L *AA[aa]CO|1
recur.discharge.date 8 DATE L *AA[aa]O3|8
refer.client 12 FREE L ADM.CLNT *AA[aa]O3|7
refer.client.name 30 FREE L VAL=@ADM.CLNT.name[@refer.client]
reg.cat 10 FREE L MIS.CAN.REGCAT *AA[aa]CNA|0
reg.cat.2 10 FREE L MIS.CAN.REGCAT *AA[aa]CNA|0
reg.number 8 FREE L
reg.number.2 9 FREE L
reg.number.init 0 FREE L VAL=(%ADM.PAT.reg.num.get(/REG)&"")
religion 10 FREE L MIS.RELIGION *AA[aa]A|0
religion.name 30 FREE L VAL=@MIS.RELIGION.name[@religion]
res.for.pay.code 1 FREE L VAL=@MIS.FIN.CLASS.resp.for.pay.code[@ADM.PAT.financia
VAL=l.class]
res.taken.date 8 DATE L *AA[aa]O3|3
res.taken.time 4 HHMM L *AA[aa]O3|4
reservation.date 8 DATE L *AA[aa]O3|1
reservation.time 8 HHMM L *AA[aa]O3|2
residence.code 10 FREE L MIS.CNTY.DICT *AA[aa]CND|4
respiration 25 FREE L *AA[aa]T1|4
room 10 FREE L MIS.ROOM.DICT *AA[aa]|10
room.and.bed 21 FREE L VAL=(@room_"-"_@bed'="-")
room.or.location.out 21 FREE L VAL=IF{@room_"-"_@bed'="-";@location}
room.rate.accom 10 FREE L *AA[aa]B|6
service 10 FREE L MIS.SVC.DICT *AA[aa]|9
service.all 10 FREE L MIS.SVC.DICT *AA[aa]|9
service.date 8 DATE L *AA[aa]|15
service.er 10 FREE L MIS.SVC.DICT *AA[aa]|9
service.in.out 10 FREE L MIS.SVC.DICT VAL=IF{@service;@outpatient.service}
service.name 30 FREE L VAL=@MIS.SVC.DICT.name[@service]
service.time 4 HHMM L *AA[aa]|16
sex 1 CHOICE L *AA[aa]|7
sex.name.out 6 FREE L VAL=IF{IF{@ADM.PAT.sex[urn];@t.MRI.DRC.sex[MRI.PAT.urn
VAL=]}^S="M" "Male";S="F" "Female";S="U" "Unknown"}
short.form.reg 1 YN L *AA[aa]O4|3
smoke.object.neither 1 CHOICE L *AA[aa]A|6
soc.sec.number 12 FREE L *AA[aa]A|2
soc.sec.number.out 12 FREE L VAL=IF{@ADM.PAT.soc.sec.number[urn];@t.MRI.DRC.soc.sec
VAL=.number[MRI.PAT.urn]}
special.pgm.indicator 10 FREE L MIS.SPEC.PROG *AA[aa]A|7
status 8 FREE L *AA[aa]|2
status.type 3 CHOICE L
status.type.out 3 FREE L VAL=(@status#2A)
status.w.obsv 7 FREE L VAL=@ADM.PAT.status_IF{@ADM.PAT.observation.patient="Y
VAL=" "o"}
suppress.emr 1 YN L *AA[aa]LD|1
temperature 25 FREE L *AA[aa]T1|1
time 4 HHMM L
treat.authorized.num 10 FREE L *AA[aa]B|10
triage.date 8 DATE L *AA[aa]T|0
triage.level 10 FREE L MIS.CAN.TRIAGE *AA[aa]T|6
triage.time 4 HHMM L *AA[aa]T|1
unit.number 10 FREE L *AA[aa]|3
unit.number.canada 10 FREE L *AA[aa]|3
unit.number.display.only 10 FREE L *AA[aa]|3
unit.number.pre.er 10 FREE L *AA[aa]|3
unit.number.quick.reg 10 FREE L *AA[aa]|3
unit.number.reg.summary 10 FREE L *AA[aa]|3
unit.number.sch 10 FREE L *AA[aa]|3
unit.number.sch.canada 10 FREE L *AA[aa]|3
unit.number.sch.short 10 FREE L *AA[aa]|3
unit.number.sch.short.can 10 FREE L *AA[aa]|3
unit.number.short 10 FREE L *AA[aa]|3
unit.number.tdo 10 FREE L VAL=%ADM.PAT.unit.number.tdo(@ADM.PAT.unit.number)
use.prior.status 1 YN L *AA[aa]O3|14
usual.visit.insurance.out 1 YN L VAL=(IF{@usual.visit.insurances;"Y"})
usual.visit.insurances 1 YN L *AA[aa]B|15
vip 1 YN L *AA[aa]A|9
vip.comment 50 FREE L *AA[aa]A|10
visitors.allowed 1 YN L *AA[aa]CN|1
weight 25 FREE L *AA[aa]T1|5
zcus.abs.status 10 FREE L *AA[aa]ZCUSOUK|5
zcus.blood.type 10 FREE L *AA[aa]ZCUSMUK|4
zcus.chronic.sick.disable 1 YN L *AA[aa]ZCUSDUK|7
zcus.contract 20 FREE L WL.CONTRACTS *AA[aa]ZCUSPUK|2
zcus.contract.app.request 8 DATE L *AA[aa]ZCUSPUK|7
zcus.contract.approve 1 YN L VAL=@WL.CONTRACTS.approval.needed[@zcus.contract]
zcus.contract.approve.no 10 FREE L *AA[aa]ZCUSPUK|5
zcus.contract.bill 9 FREE L *AA[aa]ZCUSPUK|11
zcus.contract.date 8 DATE L *AA[aa]ZCUSPUK|3
zcus.contract.drg 3 FREE L ABS.DRG *AA[aa]ZCUSPUK|17
zcus.contract.ecr 1 YN L *AA[aa]ZCUSPUK|4
zcus.contract.exp.date 8 DATE L *AA[aa]ZCUSPUK|18
zcus.contract.final.count 6 PINT R *AA[aa]ZCUSPUK|8
zcus.contract.final.days 6 PINT R *AA[aa]ZCUSPUK|9
zcus.contract.ind.chg 1 CHOICE L *AA[aa]ZCUSPUK|14
zcus.contract.name 30 FREE L VAL=@WL.CONTRACTS.name[@zcus.contract]
zcus.contract.num.visits 6 PINT R *AA[aa]ZCUSPUK|15
zcus.contract.perdiem 9 FREE L *AA[aa]ZCUSPUK|12
zcus.contract.reg.typ.grp 10 FREE L WL.REG.TYP.GRP *AA[aa]ZCUSPUK|10
zcus.contract.reg.type 3 FREE L *AA[aa]ZCUSPUK|16
zcus.contract.specialty 10 FREE L *AA[aa]ZCUSPUK|13
zcus.creation.facility 10 FREE L MIS.FACILITY *AA[aa]ZCUSMUK|2
zcus.death.date 8 DATE L *AA[aa]ZCUSMUK|1
zcus.disch.destination 10 FREE L MIS.CAN.INST *AA[aa]ZCUSOUK|2
zcus.do.not.use.4 0 FREE L *AA[aa]ZCUSDUK|4
zcus.do.not.use.7 0 FREE L *AA[aa]ZCUSOUK|7
zcus.do.not.use.8 0 FREE L *AA[aa]ZCUSOUK|8
zcus.do.not.use.9 0 FREE L *AA[aa]ZCUSOUK|9
zcus.driver.city 20 FREE L *AA[aa]ZCUS.DR|2
zcus.driver.district 10 FREE L MIS.CNTY.DICT *AA[aa]ZCUS.DR|6
zcus.driver.home.phone 18 FREE L *AA[aa]ZCUS.DR|5
zcus.driver.postal.code 10 ZIP.POST L MIS.ZIP *AA[aa]ZCUS.DR|4
zcus.driver.province 30 FREE L *AA[aa]ZCUS.DR|3
zcus.driver.state 20 FREE L *AA[aa]ZCUS.DR|3
zcus.driver.street 30 FREE L *AA[aa]ZCUS.DR|0
zcus.driver.street2 30 FREE L *AA[aa]ZCUS.DR|1
zcus.driver.zip 10 ZIP.POST L *AA[aa]ZCUS.DR|4
zcus.dx 7 FREE L ABS.DIAG *AA[aa]ZCUSOUK|4
zcus.er.clinic.or.ward 20 FREE L *AA[aa]ZCUSERN|13
zcus.er.complaint.dur 10 FREE L *AA[aa]ZCUSERN|0
zcus.er.depart.nurse 10 FREE L MIS.USER *AA[aa]ZCUSERM|11
zcus.er.dependancy.scor 1 INT R *AA[aa]ZCUSERN|14
zcus.er.dr1.seen.date 8 DATE L *AA[aa]ZCUSERN|11
zcus.er.dr1.seen.time 4 HHMM L *AA[aa]ZCUSERN|12
zcus.er.driver 30 FREE L *AA[aa]ZCUSOUK|11
zcus.er.driver.title 10 FREE L *AA[aa]ZCUSOUK|14
zcus.er.exam.doctor 10 FREE L MIS.DOC.DICT *AA[aa]ZCUSERN|17
zcus.er.expected 1 YN L *AA[aa]ZCUSERN|4
zcus.er.gp.letter 1 YN L *AA[aa]ZCUSERN|15
zcus.er.gp.letter.date 8 DATE L *AA[aa]ZCUSERN|16
zcus.er.inp.urn 10 FREE L *AA[aa]ZCUSOUK|15
zcus.er.instructions 10 FREE L MIS.ZCUS.INSTR *AA[aa]ZCUSERN|6
zcus.er.letter 10 FREE L MIS.ZCUS.LET *AA[aa]ZCUSERN|7
zcus.er.letter.date.sent 8 DATE L *AA[aa]ZCUSERN|8
zcus.er.letter.time.sent 4 TIME L *AA[aa]ZCUSERN|9
zcus.er.named.nurse 10 FREE L MIS.USER *AA[aa]ZCUSERM|10
zcus.er.not.used1 0 FREE L *AA[aa]ZCUSERM|1
zcus.er.not.used2 0 FREE L *AA[aa]ZCUSERM|2
zcus.er.not.used3 0 FREE L *AA[aa]ZCUSERM|7
zcus.er.not.used4 0 FREE L *AA[aa]ZCUSERM|8
zcus.er.planned 1 YN L *AA[aa]ZCUSERN|5
zcus.er.rx.one 25 FREE L *AA[aa]ZCUSERM|12
zcus.er.seen.by 20 FREE L *AA[aa]ZCUSERN|3
zcus.er.seen.date 8 DATE L *AA[aa]ZCUSERN|1
zcus.er.seen.time 4 HHMM L *AA[aa]ZCUSERN|2
zcus.er.tetanus.given 1 YN L *AA[aa]ZCUSERN|10
zcus.er.triage.category 20 CHOICE L *AA[aa]ZCUSERM|5
zcus.er.triage.del1 30 CHOICE L *AA[aa]ZCUSERM|0
zcus.er.triage.delay.rsn 50 FREE L *AA[aa]ZCUSERM|3
zcus.er.triage.nurse 10 FREE L MIS.USER *AA[aa]ZCUSERM|4
zcus.er.trolley.del1 2 INT R *AA[aa]ZCUSERM|6
zcus.er.trolley.delay.rsn 50 FREE L *AA[aa]ZCUSERM|9
zcus.er.visit.type 1 CHOICE L *AA[aa]ZCUSOUK|10
zcus.gp.referral.number 10 FREE L *AA[aa]ZCUSREF|7
zcus.initiative 10 FREE L WL.INITIATIVE *AA[aa]ZCUSREF|8
zcus.leave.bed 10 FREE L MIS.ROOM.DICT *AA[aa]ZCUSLV|3
zcus.leave.comment 55 FREE L *AA[aa]ZCUSLV|6
zcus.leave.date 8 DATE L *AA[aa]ZCUSLV|0
zcus.leave.return.date 8 DATE L *AA[aa]ZCUSLV|4
zcus.leave.return.time 4 HHMM L *AA[aa]ZCUSLV|5
zcus.leave.room 10 FREE L MIS.ROOM.DICT *AA[aa]ZCUSLV|2
zcus.leave.time 4 HHMM L *AA[aa]ZCUSLV|1
zcus.letter 10 FREE L *AA[aa]ZCUSLET|0
zcus.management.intent 10 FREE L WL.MANAGEMENT *AA[aa]ZCUSOUK|27
zcus.model.box.number 10 FREE L *AA[aa]ZCUSDUK|2
zcus.nok.comment 30 FREE L *AA[aa]ZCUSDUK|5
zcus.nok.title 10 FREE L *AA[aa]ZCUSDUK|3
zcus.not.use5 0 FREE L *AA[aa]ZCUSOUK|19
zcus.not.used2 0 FREE L *AA[aa]ZCUSOUK|16
zcus.not.used3 0 FREE L *AA[aa]ZCUSOUK|17
zcus.not.used4 0 FREE L *AA[aa]ZCUSOUK|18
zcus.not.used5 0 FREE L *AA[aa]ZCUSERM|13
zcus.not.used6 0 FREE L *AA[aa]ZCUSOUK|20
zcus.not.used7 0 FREE L *AA[aa]ZCUSOUK|21
zcus.not.used8 0 FREE L *AA[aa]ZCUSOUK|22
zcus.not.used9 0 FREE L *AA[aa]ZCUSOUK|23
zcus.notes.created 10 FREE L *AA[aa]ZCUSMUK|3
zcus.notify.comment 30 FREE L *AA[aa]ZCUSDUK|6
zcus.number.and.name 44 FREE L VAL=@unit.number_" "_@name
zcus.number.name.unit 55 FREE L VAL=(IF{O(*)=O(?) @MRI.PAT.unit.number_" "_@MRI.PAT.n
VAL=ame;@acct.number_" "_@name_" "_@unit.number}:0S)
zcus.pat.overseas.visitor 1 YN L *AA[aa]ZCUSDUK|0
zcus.pat.perm.city 30 FREE L *AA[aa]ZCUS.PA|2
zcus.pat.perm.district 10 FREE L MIS.CNTY.DICT *AA[aa]ZCUS.PA|6
zcus.pat.perm.home.phone 18 FREE L *AA[aa]ZCUS.PA|5
zcus.pat.perm.postal.code 10 ZIP.POST L *AA[aa]ZCUS.PA|4
zcus.pat.perm.province 30 FREE L *AA[aa]ZCUS.PA|3
zcus.pat.perm.state 20 FREE L *AA[aa]ZCUS.PA|3
zcus.pat.perm.street 30 FREE L *AA[aa]ZCUS.PA|0
zcus.pat.perm.street2 30 FREE L *AA[aa]ZCUS.PA|1
zcus.pat.perm.zip 10 ZIP.POST L MIS.ZIP *AA[aa]ZCUS.PA|4
zcus.pat.temp.resident 1 YN L *AA[aa]ZCUSDUK|1
zcus.preoperative.clinic 1 YN L *AA[aa]ZCUSREF|10
zcus.procedure 7 FREE L ABS.PROC *AA[aa]ZCUSOUK|3
zcus.procedure.severity 10 FREE L WL.PROC.SEVER *AA[aa]ZCUSOUK|13
zcus.purchaser 10 FREE L MIS.INS.DICT *AA[aa]ZCUSPUK|0
zcus.purchaser.category 10 FREE L MIS.INS.GROUP *AA[aa]ZCUSPUK|1
zcus.purchaser.name 30 FREE L VAL=@MIS.INS.DICT.name[@zcus.purchaser]
zcus.purchaser.user 10 FREE L MIS.USER *AA[aa]ZCUSPUK|6
zcus.reference.letter.urn 10 FREE L *AA[aa]ZCUSREF|0
zcus.reference.sch.urn 10 FREE L *AA[aa]ZCUSREF|1
zcus.referral.reason 10 FREE L WL.REF.REASON *AA[aa]ZCUSOUK|1
zcus.referral.source 10 FREE L WL.REF.SOURCE *AA[aa]ZCUSOUK|0
zcus.referral.source.name 30 FREE L VAL=@WL.REF.SOURCE.name[@zcus.referral.source]
zcus.referrer 10 FREE L MIS.REF.DICT *AA[aa]ZCUSOUK|25
zcus.referrer.org 10 FREE L MIS.REF.ORG *AA[aa]ZCUSOUK|26
zcus.remove.from.wl 1 YN L *AA[aa]ZCUSREF|3
zcus.rm.from.wl 1 FREE L *AA[aa]ZCUSOUK|24
zcus.rta.victim.type 20 CHOICE L *AA[aa]ZCUSRTA|0
zcus.sch.visit.type 1 CHOICE L *AA[aa]ZCUSREF|6
zcus.title 10 FREE L *AA[aa]ZCUSMUK|0
zcus.type.of.attendances 1 CHOICE L *AA[aa]ZCUSOUK|12
zcus.uk.birth.del.time 4 TIME L *AA[aa]ZCUSNHS|0
zcus.uk.ethnic.origin 10 FREE L MIS.RACE.DICT *AA[aa]ZCUSNHS|1
zcus.uk.is.rta 1 YN L *AA[aa]ZCUSRTA|1
zcus.uk.is.rta.setup 0 FREE L VAL=IF{@zcus.uk.is.rta.temp_0=0 "N"^@zcus.uk.is.rta.te
VAL=mp}:0T
zcus.uk.is.rta.temp 1 YN L VAL=@t.zcus.uk.is.rta
zcus.uk.is.rta.view 1 YN L *AA[aa]ZCUSRTA|1
zcus.uk.pcg 10 FREE L MIS.ZCUS.PCG *AA[aa]ZCUSDUK|8
zcus.uk.receive.nhs.num 1 YN L *AA[aa]CND["ZCUSNHS"]|1
zcus.uk.request.nhs.num 1 YN L *AA[aa]CND["ZCUSNHS"]|0
zcus.uk.rta.accident.no 2 PINT R *AA[aa]ZCUSRTA|3
zcus.uk.rta.date 8 DATE L *AA[aa]ZCUSRTA|2
zcus.unit.number.uk 10 FREE L *AA[aa]|3
zcus.unit.number.uk.preer 10 FREE L *AA[aa]|3
zcus.unit.number.uk.sch 10 FREE L *AA[aa]|3
zcus.unit.number.uk.sch.s 10 FREE L *AA[aa]|3
zcus.unit.number.uk.short 10 FREE L *AA[aa]|3
zcus.unit.number.uk.summ 10 FREE L *AA[aa]|3
zcus.ward.att.seen.by.con 1 YN L *AA[aa]ZCUSOUK|6
zcus.ward.dis.appt 1 YN L *AA[aa]ZCUSREF|9
zcus.wl.outcome 10 FREE L WL.OUTCOME.DICT*AA[aa]ZCUSREF|4
zcus.wl.removal.reason 10 FREE L WL.REMOVAL *AA[aa]ZCUSREF|5
zcus.wl.tci.date 8 DATE L *AA[aa]ZCUSREF|2
zip.or.county 10 FREE L VAL=IF{"C"'=@ADM.PARAM.zip.or.county.stats @ADM.PAT.pa
VAL=t.zip;IF{@MIS.PARAM.country="US" IF{@MIS.ZIP.count
VAL=y[@ADM.PAT.pat.zip];@MIS.ZIP.county[@ADM.PAT.pat.z
VAL=ip$5]};@ADM.PAT.residence.code};"U"}
zip.or.county.t 10 FREE L VAL=IF{"C"'=@ADM.PARAM.zip.or.county.stats @t.ADM.PAT.
VAL=pat.zip;IF{@MIS.PARAM.country="US" IF{@MIS.ZIP.cou
VAL=nty[@t.ADM.PAT.pat.zip];@MIS.ZIP.county[@t.ADM.PAT
VAL=.pat.zip$5]};@t.ADM.PAT.residence.code};"U"}
Ì € i 2
adm.pat.allergies (allergies)
[urn, allergy.num]
*AA[aa]ALG[aal]
Field Name Len Dat Typ J DPM Offset/Local/VAL
allergy.num 1 PINT R aal
allergy 15 FREE L *AA[aa]ALG[aal]
Ì € i 2
adm.scheduled.appts (appts.from.sch)
[urn, appt.urn]
*AA[aa]WZ[wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
appt.urn 10 FREE L wz
appt.date 8 DATE L *AA[aa]WZ[wz]|0
appt.location 10 FREE L MIS.LOCN.DICT *AA[aa]WZ[wz]|2
appt.time 4 HHMM5 L *AA[aa]WZ[wz]|1
Ì € i 2
adm.pat.canadian.acct.numbers (can.acct.numbers)
[urn, old.can.number.seq.no]
*AA[aa]CNN[aq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
old.can.number.seq.no 2 INT R aq
old.can.acct.number 12 FREE L *AA[aa]CNN[aq]|0
old.can.acct.status 7 CHOICE L *AA[aa]CNN[aq]|1
old.can.reg.cat 10 FREE L MIS.CAN.REGCAT *AA[aa]CNN[aq]|2
Ì € i 2
adm.pat.alerts.canada (can.alerts)
[urn, alert.num]
*AA[aa]CNR[aar]
Field Name Len Dat Typ J DPM Offset/Local/VAL
alert.num 1 PINT R aar
alert 15 FREE L *AA[aa]CNR[aar]
Ì € i 2
adm.pat.conditions (conditions)
[urn, cond.seq.no]
*AA[aa]C[aaCN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cond.seq.no 1 PINT R aaCN
condition 10 FREE L MIS.COND *AA[aa]C[aaCN]|0
Ì € i 2
adm.pat.additional.doctors (consulting.doctors)
[urn, consulting.doctor]
*AA[aa]CDR[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
consulting.doctor 10 FREE L MIS.DOC.DICT ggg
consulting.doctor.name 30 FREE L VAL=@MIS.DOC.DICT.name[@consulting.doctor]
consulting.dr.name.out 30 FREE L VAL=IF{@MIS.DOC.DICT.name[@consulting.doctor];@consult
VAL=ing.doctor}
Ì € i 2
adm.pat.custom.defined.queries (customer.defined.queries)
[urn, cd.query]
*AA[aa]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query 10 FREE L MIS.QUERY ggv
cd.mult.qry.map.date 8 DATE L *AA[aa]CD[ggv]INIT
cd.response 75 QRY.RESP L *AA[aa]CD[ggv]|0
Ì € i 2
customer.defined.multiple.flds (customer.def.mult.queries)
[urn,cd.query, cdm.seq.no]
*AA[aa]CD[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cdm.seq.no 3 PINT R ggvN
cdm.response 75 QRY.RESP L *AA[aa]CD[ggv]M[ggvN]|0
Ì € i 2
adm.pat.customer.def.screens (customer.defined.screens)
[urn, cd.screen]
*AA[aa]CDS[gxx]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.screen 15 FREE L MIS.SCREEN gxx
Ì € i 2
adm.pat.diagnoses (dxs)
[urn, dx.seq.no]
*AA[aa]DX[aaDN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dx.seq.no 2 PINT R aaDN
dx.alt.name 60 FREE L *AA[aa]DX[aaDN]|1
dx.code 7 FREE L *AA[aa]DX[aaDN]|0
Ì € i 2
adm.pat.emp.info.data (emp.info.data)
[urn, eid.seq.no]
*AA[aa]EI[aaEN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
eid.seq.no 1 PINT R aaEN
eid 10 FREE L MIS.EID *AA[aa]EI[aaEN]|0
eid.employee.id 12 FREE L *AA[aa]EI[aaEN]|4
eid.employer.loc 30 FREE L *AA[aa]EI[aaEN]|3
eid.employer.name 10 FREE L MIS.EMPLR.DICT *AA[aa]EI[aaEN]|2
eid.status 10 FREE L MIS.EMP.STATUS *AA[aa]EI[aaEN]|1
Ì € i 2
adm.pat.events (events)
[urn, event.date,event.seq.no]
*AA[aa]EV[evdt,aev]
Field Name Len Dat Typ J DPM Offset/Local/VAL
event.date 8 DATE L evdt
event.seq.no 2 PINT R aev
event.accom 10 FREE L MIS.ACCOM.DICT *AA[aa]EV[evdt,aev]|8
event.admit.doctor 10 FREE L MIS.DOC.DICT *AA[aa]EV[evdt,aev]|3
event.attend.doctor 10 FREE L MIS.DOC.DICT *AA[aa]EV[evdt,aev]|4
event.bed 10 FREE L *AA[aa]EV[evdt,aev]|7
event.code 16 FREE L *AA[aa]EV[evdt,aev]|0
event.comment 55 FREE L *AA[aa]EV[evdt,aev]C|0
event.county 10 FREE L MIS.CNTY.DICT *AA[aa]EV[evdt,aev]|2
event.date.undone 8 DATE L *AA[aa]EV[evdt,aev]D|8
event.description 60 FREE L VAL=@ADM.PARAM.event.description[@event.code]_" "_@eve
VAL=nt.qualifiers
event.dis.dispo.expired 1 YN L *AA[aa]EV[evdt,aev]|12
event.eff.date 8 DATE L *AA[aa]EV[evdt,aev]|1
event.eff.time 4 HHMM L *AA[aa]EV[evdt,aev]D|2
event.financial.class 10 FREE L MIS.FIN.CLASS *AA[aa]EV[evdt,aev]|11
event.location 10 FREE L MIS.LOCN.DICT *AA[aa]EV[evdt,aev]|5
event.new.val 20 FREE L *AA[aa]EV[evdt,aev]D|3
event.old.accomodation 10 FREE L MIS.ACCOM.DICT *AA[aa]EV[evdt,aev]U|13
event.old.attend.doctor 10 FREE L MIS.DOC.DICT *AA[aa]EV[evdt,aev]U|1
event.old.bed 10 FREE L *AA[aa]EV[evdt,aev]U|5
event.old.conf.comment 50 FREE L *AA[aa]EV[evdt,aev]U|11
event.old.confidential 1 YN L *AA[aa]EV[evdt,aev]U|10
event.old.er.doctor 10 FREE L MIS.DOC.DICT *AA[aa]EV[evdt,aev]U|7
event.old.location 10 FREE L MIS.LOCN.DICT *AA[aa]EV[evdt,aev]U|3
event.old.outpt.service 10 FREE L MIS.SVC.DICT *AA[aa]EV[evdt,aev]U|12
event.old.rm.rate.accom 10 FREE L MIS.ACCOM.DICT *AA[aa]EV[evdt,aev]U|6
event.old.room 10 FREE L MIS.ROOM.DICT *AA[aa]EV[evdt,aev]U|4
event.old.service 10 FREE L MIS.SVC.DICT *AA[aa]EV[evdt,aev]U|2
event.old.service.date 8 DATE L *AA[aa]EV[evdt,aev]U|8
event.old.service.time 4 HHMM L *AA[aa]EV[evdt,aev]U|9
event.old.status 7 CHOICE L *AA[aa]EV[evdt,aev]U|0
event.old.val 20 FREE L *AA[aa]EV[evdt,aev]D|4
event.prim.care.doctor 10 FREE L MIS.DOC.DICT *AA[aa]EV[evdt,aev]|14
event.qualifiers 30 FREE L *AA[aa]EV[evdt,aev]D|5
event.rcr.dt 8 DATE L *AA[aa]EV[evdt,aev]|15
event.rcr.new.sv.date 8 DATE L *AA[aa]EV[evdt,aev]|13
event.rcr.tm 4 HHMM L *AA[aa]EV[evdt,aev]|16
event.room 10 FREE L MIS.ROOM.DICT *AA[aa]EV[evdt,aev]|6
event.room.rate.accom 10 FREE L MIS.ACCOM.DICT *AA[aa]EV[evdt,aev]|9
event.seq.undone 2 FREE L *AA[aa]EV[evdt,aev]D|7
event.service 10 FREE L MIS.SVC.DICT *AA[aa]EV[evdt,aev]|10
event.status 7 FREE L *AA[aa]EV[evdt,aev]D|6
event.time 4 HHMM L *AA[aa]EV[evdt,aev]D|0
event.transfer.comment 55 FREE L *AA[aa]EV[evdt,aev]C|0
event.undo.comment 55 FREE L *AA[aa]EV[evdt,aev]C|0
event.user 10 FREE L MIS.USER *AA[aa]EV[evdt,aev]D|1
event.zip.code 10 ZIP.POST L MIS.ZIP *AA[aa]EV[evdt,aev]|2
event.zip.or.county 10 FREE L *AA[aa]EV[evdt,aev]|2
xxx.swap.event 0 FREE L VAL=IF{"z"^X,DO{"SWAPADMIN"'=*AA[urn]EV[X]|0&X <*AA
VAL=[urn]EV[X]^X},X#0S^event.date,X#1S^event.seq.no}&"
VAL="
xxx.swap.oth.acct 12 FREE L VAL=IF{@event.qualifiers%1;"NOT AVAILABLE"}
xxx.swap.oth.name 30 FREE L VAL=IF{@name[*AAAI[@event.qualifiers%1#"0 "]];"NOT AVA
VAL=ILABLE"}
xxx.xfer.event 0 FREE L VAL=%ADM.PAT.transfer.message.setup("")
Ì € i 2
adm.pat.event.segments (event.segments)
[urn,event.date,event.seq.no, event.segment]
*AA[aa]EV[evdt,aev]S[evs]
Field Name Len Dat Typ J DPM Offset/Local/VAL
event.segment 3 FREE L evs
event.seg.changed 78 FREE L VAL=IF{"CD"'=event.segment "EDITED "}_%ADM.PAT.activit
VAL=y.seg(ADM.PAT.event.segment)_IF{"CD"=event.segment
VAL= " UPDATED"}
event.seg.name 70 FREE L VAL=%ADM.PAT.activity.seg(ADM.PAT.event.segment)
Ì € i 2
adm.pat.event.other.locations (events.other.locations)
[urn,event.date,event.seq.no, event.other.location]
*AA[aa]EV[evdt,aev]OL[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
event.other.location 10 FREE L MIS.LOCN.DICT ggn
Ì € i 2
adm.pat.events.undo.other.locs (events.undo.other.locs)
[urn,event.date,event.seq.no, events.old.other.location]
*AA[aa]EV[evdt,aev]UOL[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
events.old.other.location 10 FREE L MIS.LOCN.DICT ggn
Ì € i 2
adm.pat.hhrg (hhrg)
[urn, hhrg.asmnt.date]
*AA[aa]HHRG[aaHSD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hhrg.asmnt.date 14 PINT R aaHSD
hhrg.asmnt.code 2 PINT R *AA[aa]HHRG[aaHSD]|4
hhrg.code 10 FREE L MIS.HHRG.DICT *AA[aa]HHRG[aaHSD]|1
hhrg.eoc 8 DATE L *AA[aa]HHRG[aaHSD]|0
hhrg.hipps 5 FREE L *AA[aa]HHRG[aaHSD]|6
hhrg.msa 10 FREE L MIS.MSA.DICT *AA[aa]HHRG[aaHSD]|2
hhrg.oasis.key 18 FREE L *AA[aa]HHRG[aaHSD]|5
hhrg.soc 8 DATE L *AA[aa]HHRG[aaHSD]|3
Ì € i 2
adm.pat.hhrg.dxs (hhrg.dxs)
[urn,hhrg.asmnt.date, hhrg.dx.seq.no]
*AA[aa]HHRG[aaHSD]DX[aaHDN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hhrg.dx.seq.no 2 PINT R aaHDN
hhrg.dx.code 7 FREE L *AA[aa]HHRG[aaHSD]DX[aaHDN]|0
Ì € i 2
adm.pat.insurances (insurances)
[urn, insurance]
*AA[aa]I[ggm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
insurance 10 FREE L MIS.INS.DICT ggm
ins.auth.diag.code 6 FREE L *AA[aa]I[ggm]A|1
ins.auth.diag.desc 30 FREE L *AA[aa]I[ggm]A|2
ins.auth.eff.date 8 DATE L *AA[aa]I[ggm]A|7
ins.auth.exp.date 8 DATE L *AA[aa]I[ggm]A|8
ins.auth.ipa.reimb.amt 9 MONEY R *AA[aa]I[ggm]A|10
ins.auth.last.user 10 FREE L MIS.USER *AA[aa]I[ggm]A|12
ins.auth.number 18 FREE L VAL=@insurance.treat.auth.num
ins.auth.process 10 FREE L VAL="AUTH"
ins.auth.process.status 8 CHOICE L *AA[aa]I[ggm]A|5
ins.auth.process.tried.q 1 FREE L *AA[aa]I[ggm]A|11
ins.auth.ref.provider 10 FREE L MIS.DOC.DICT *AA[aa]I[ggm]A|9
ins.auth.status 9 CHOICE L *AA[aa]I[ggm]A|4
ins.auth.status.date 8 DATE L *AA[aa]I[ggm]A|6
ins.auth.status.out 9 FREE L VAL=IF{@ins.auth.status;@ins.auth.process.status}
ins.auth.units 3 PINT R *AA[aa]I[ggm]A|3
ins.elig.inq.seq.no 3 INT R *AA[aa]I[ggm]L|5
ins.elig.last.user 10 FREE L MIS.USER *AA[aa]I[ggm]L|3
ins.elig.process 10 FREE L VAL="ELIG"
ins.elig.process.tried.q 1 FREE L *AA[aa]I[ggm]L|2
ins.elig.status 8 CHOICE L *AA[aa]I[ggm]L|0
ins.elig.status.date 8 DATE L *AA[aa]I[ggm]L|1
ins.elig.trace.num 40 FREE L *AA[aa]I[ggm]L|4
ins.emp.loc 30 FREE L *AA[aa]I[ggm]E|2
ins.emp.name 10 FREE L MIS.EMPLR.DICT *AA[aa]I[ggm]E|1
ins.emp.status 10 FREE L MIS.EMP.STATUS *AA[aa]I[ggm]E|0
ins.policy.num 30 FREE L VAL=@insured.policy.number[urn,@insurance.mnemonic]
ins.print.cds 0 FREE L VAL=%ADM.PAT.print.ins.screen(urn,insurance,"",0)
ins.print.cds.43 0 FREE L VAL=%ADM.PAT.print.ins.screen(urn,insurance,"",43)
ins.print.cds.6 0 FREE L VAL=%ADM.PAT.print.ins.screen(urn,insurance,"",6)
ins.print.cds.verbatim 0 FREE L VAL=%ADM.PAT.print.ins.screen(urn,insurance,1,0)
ins.print.queries 8 FREE L VAL=%ADM.PAT.print.ins.screen(urn,insurance,"",0,1)
insurance.benefit.plan 20 FREE L *AA[aa]I[ggm]N|9
insurance.city 20 FREE L *AA[aa]I[ggm]|1
insurance.cov.no 20 FREE L *AA[aa]I[ggm]N|7
insurance.eff.date 8 DATE L *AA[aa]I[ggm]N|5
insurance.exp.date 8 DATE L *AA[aa]I[ggm]N|6
insurance.other.name 30 FREE L *AA[aa]I[ggm]|5
insurance.phone 30 PHONE L *AA[aa]I[ggm]|4
insurance.postal.code 10 ZIP.POST L *AA[aa]I[ggm]|3
insurance.province 2 FREE L *AA[aa]I[ggm]|2
insurance.state 20 FREE L *AA[aa]I[ggm]|2
insurance.street 30 FREE L *AA[aa]I[ggm]|0
insurance.street2 30 FREE L *AA[aa]I[ggm]|6
insurance.treat.auth.num 18 FREE L *AA[aa]I[ggm]N|8
insurance.zip 10 ZIP.POST L *AA[aa]I[ggm]|3
insured.group.name 30 FREE L *AA[aa]I[ggm]N|4
insured.group.number 15 FREE L *AA[aa]I[ggm]N|3
insured.name 30 FREE L *AA[aa]I[ggm]N|0
insured.name.out 30 NAME L VAL=IF{@insured.subscriber^SUB @MRI.SUBSCRIBER.subs.na
VAL=me[SUB];@insured.name}
insured.policy.number 30 FREE L *AA[aa]I[ggm]N|2
insured.relationship 10 FREE L MIS.RELAT.DICT *AA[aa]I[ggm]N|1
insured.subscriber 35 URN L MRI.SUBSCRIBER *AA[aa]I[ggm]N|10
insured.update.subs.data 1 YN L *AA[aa]I[ggm]N|13
Ì € i 2
adm.pat.ins.auth.procedures (ins.auth.procedures)
[urn,insurance, ins.auth.proc.seq.no]
*AA[aa]I[ggm]A["P",aaIAP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.auth.proc.seq.no 2 PINT R aaIAP
ins.auth.proc 10 FREE L *AA[aa]I[ggm]A["P",aaIAP]|0
ins.auth.proc.amt 9 MONEY R *AA[aa]I[ggm]A["P",aaIAP]|1
ins.auth.proc.copay 8 MONEY R *AA[aa]I[ggm]A["P",aaIAP]|3
ins.auth.proc.units 3 PINT R *AA[aa]I[ggm]A["P",aaIAP]|2
Ì € i 2
adm.pat.ins.auth.req.data (ins.auth.req.data)
[urn,insurance, ins.auth.req.seq.no]
*AA[aa]I[ggm]R[aaIRQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.auth.req.seq.no 2 PINT R aaIRQ
ins.auth.req.diag.code 6 FREE L *AA[aa]I[ggm]R[aaIRQ]|2
ins.auth.req.diag.desc 30 FREE L *AA[aa]I[ggm]R[aaIRQ]|3
ins.auth.req.last.user 10 FREE L MIS.USER *AA[aa]I[ggm]R[aaIRQ]|9
ins.auth.req.number 18 FREE L *AA[aa]I[ggm]R[aaIRQ]|7
ins.auth.req.process 10 FREE L VAL="REF REQ"
ins.auth.req.pros.tried.q 1 FREE L *AA[aa]I[ggm]R[aaIRQ]|8
ins.auth.req.prv.enc 10 FREE L *AA[aa]I[ggm]R[aaIRQ]|10
ins.auth.req.prv.enc.ref 2 FREE L *AA[aa]I[ggm]R[aaIRQ]|11
ins.auth.req.prv.ref.urn 10 URN L PRV.REF *AA[aa]I[ggm]R[aaIRQ]|10
ins.auth.req.reqd.prov 10 FREE L MIS.DOC.DICT *AA[aa]I[ggm]R[aaIRQ]|6
ins.auth.req.reqg.prov 10 FREE L MIS.DOC.DICT *AA[aa]I[ggm]R[aaIRQ]|5
ins.auth.req.status 8 CHOICE L *AA[aa]I[ggm]R[aaIRQ]|0
ins.auth.req.status.date 8 DATE L *AA[aa]I[ggm]R[aaIRQ]|1
ins.auth.req.units 3 INT R *AA[aa]I[ggm]R[aaIRQ]|4
Ì € i 2
adm.pat.ins.auth.req.services (ins.auth.req.services)
[urn,insurance,ins.auth.req.seq.no, ins.auth.req.ser.seq.no]
*AA[aa]I[ggm]R[aaIRQ]S[aaIRS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.auth.req.ser.seq.no 2 PINT R aaIRS
ins.auth.req.fin.resp 10 CHOICE L *AA[aa]I[ggm]R[aaIRQ]S[aaIRS]|0
ins.auth.req.proc.code 10 FREE L *AA[aa]I[ggm]R[aaIRQ]S[aaIRS]|1
ins.auth.req.proc.desc 30 FREE L *AA[aa]I[ggm]R[aaIRQ]S[aaIRS]|3
ins.auth.req.quantity 4 PINT R *AA[aa]I[ggm]R[aaIRQ]S[aaIRS]|4
ins.auth.req.use.cpt 1 YN L *AA[aa]I[ggm]R[aaIRQ]S[aaIRS]|2
Ì € i 2
adm.pat.ins.custom.def.queries (ins.cd.queries)
[urn,insurance, ins.cd.query]
*AA[aa]I[ggm]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.cd.query 10 FREE L MIS.QUERY ggv
ins.cd.mult.qry.map.date 8 DATE L *AA[aa]I[ggm]CD[ggv]INIT
ins.cd.response 75 QRY.RESP L *AA[aa]I[ggm]CD[ggv]|0
Ì € i 2
adm.pat.ins.cust.def.mult.qrys (ins.cd.mult.queries)
[urn,insurance,ins.cd.query, ins.cdm.seq.no]
*AA[aa]I[ggm]CD[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.cdm.seq.no 3 PINT R ggvN
ins.cdm.response 75 QRY.RESP L *AA[aa]I[ggm]CD[ggv]M[ggvN]|0
Ì € i 2
adm.pat.insurance.queries (ins.queries)
[urn,insurance, query.seq.no]
*AA[aa]I[ggm]Q[ggmQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query.seq.no 2 PINT R ggmQ
ins.query 60 FREE L VAL=@MIS.QUERY.text[@ADM.PAT.ins.query.mnemonic]
ins.query.and.answer 136 FREE L VAL=(@ins.query_" "_@ins.query.answer)
ins.query.answer 75 QRY.RESP L *AA[aa]I[ggm]Q[ggmQ]|1
ins.query.color.screen 75 FREE L VAL=(@Set.attr(@Z.color.labels1)_(@ins.query:75L)_@Set
VAL=.attr(@Z.color.data1))
ins.query.count 2 INT R VAL=(-@ADM.PAT.ins.queries[ADM.PAT.urn,insurance,""]+0
VAL=)
ins.query.mnemonic 10 FREE L MIS.QUERY *AA[aa]I[ggm]Q[ggmQ]|0
ins.query.screen 60 FREE L VAL=IF{@ins.query @Z.start.background_@Z.normal.backgr
VAL=ound.half_@ins.query_@Z.start.foreground_@Z.normal
VAL=.foreground.full}
Ì € i 2
adm.pat.insurance.order (insure.order)
[urn, ins.seq.no]
*AA[aa]IO[aaIN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.seq.no 1 PINT R aaIN
display.ins.name 30 FREE L VAL=IF{@MIS.INS.DICT.other.type="Y" IF{@insurance.othe
VAL=r.name;@MIS.INS.DICT.name};@MIS.INS.DICT.name}
insurance.auth.no.1 18 FREE L VAL=@insurance.treat.auth.num[urn,@insurance.mnemonic[
VAL=1]]
insurance.auth.no.2 18 FREE L VAL=@insurance.treat.auth.num[urn,@insurance.mnemonic[
VAL=2]]
insurance.auth.no.3 18 FREE L VAL=@insurance.treat.auth.num[urn,@insurance.mnemonic[
VAL=3]]
insurance.auth.no.4 18 FREE L VAL=@insurance.treat.auth.num[urn,@insurance.mnemonic[
VAL=4]]
insurance.group.no.1 15 FREE L VAL=@insured.group.number[urn,@insurance.mnemonic[1]]
insurance.group.no.2 15 FREE L VAL=@insured.group.number[urn,@insurance.mnemonic[2]]
insurance.group.no.3 15 FREE L VAL=@insured.group.number[urn,@insurance.mnemonic[3]]
insurance.group.no.4 15 FREE L VAL=@insured.group.number[urn,@insurance.mnemonic[4]]
insurance.mnemonic 10 FREE L MIS.INS.DICT *AA[aa]IO[aaIN]|0
insurance.mnemonic.1 10 FREE L VAL=IF{@insurance.mnemonic[1];@t.MRI.DRC.insurance.mne
VAL=monic[MRI.PAT.urn,1]}
insurance.mnemonic.2 10 FREE L VAL=IF{@insurance.mnemonic[2];@t.MRI.DRC.insurance.mne
VAL=monic[MRI.PAT.urn,2]}
insurance.name 30 FREE L VAL=IF{@t.insurance.other.name[@insurance.mnemonic[ins
VAL=.seq.no]];@MIS.INS.DICT.name[@insurance.mnemonic[i
VAL=ns.seq.no]]}
insurance.name.1 30 FREE L VAL=IF{@t.insurance.other.name[IF{@insurance.mnemonic[
VAL=1];@t.MRI.DRC.insurance.mnemonic[MRI.PAT.urn,1]}^I
VAL=NS];@MIS.INS.DICT.name[INS]}
insurance.name.2 30 FREE L VAL=IF{@t.insurance.other.name[IF{@insurance.mnemonic[
VAL=2];@t.MRI.DRC.insurance.mnemonic[MRI.PAT.urn,2]}^I
VAL=NS];@MIS.INS.DICT.name[INS]}
insurance.name.3 30 FREE L VAL=IF{@t.insurance.other.name[IF{@insurance.mnemonic[
VAL=3];@t.MRI.DRC.insurance.mnemonic[MRI.PAT.urn,3]}^I
VAL=NS];@MIS.INS.DICT.name[INS]}
insurance.name.4 30 FREE L VAL=IF{@t.insurance.other.name[IF{@insurance.mnemonic[
VAL=4];@t.MRI.DRC.insurance.mnemonic[MRI.PAT.urn,4]}^I
VAL=NS];@MIS.INS.DICT.name[INS]}
insurance.no.and.mne 13 FREE L VAL=(ins.seq.no_" "_insurance.mnemonic)
insurance.pol.no.1 30 FREE L VAL=@insured.policy.number[urn,@insurance.mnemonic[1]]
insurance.pol.no.2 30 FREE L VAL=@insured.policy.number[urn,@insurance.mnemonic[2]]
insurance.pol.no.3 30 FREE L VAL=@insured.policy.number[urn,@insurance.mnemonic[3]]
insurance.pol.no.4 30 FREE L VAL=@insured.policy.number[urn,@insurance.mnemonic[4]]
insured.name.1 30 FREE L VAL=IF{@insured.name[urn,@insurance.mnemonic[1]];@t.MR
VAL=I.DRC.insured.name[MRI.PAT.urn,@t.MRI.DRC.insuranc
VAL=e.mnemonic[MRI.PAT.urn,1]]}
insured.name.2 30 FREE L VAL=IF{@insured.name[urn,@insurance.mnemonic[2]];@t.MR
VAL=I.DRC.insured.name[MRI.PAT.urn,@t.MRI.DRC.insuranc
VAL=e.mnemonic[MRI.PAT.urn,2]]}
insured.name.3 30 FREE L VAL=IF{@insured.name[urn,@insurance.mnemonic[3]];@t.MR
VAL=I.DRC.insured.name[MRI.PAT.urn,@t.MRI.DRC.insuranc
VAL=e.mnemonic[MRI.PAT.urn,3]]}
insured.name.4 30 FREE L VAL=IF{@insured.name[urn,@insurance.mnemonic[4]];@t.MR
VAL=I.DRC.insured.name[MRI.PAT.urn,@t.MRI.DRC.insuranc
VAL=e.mnemonic[MRI.PAT.urn,4]]}
Ì € i 2
adm.pat.mn.visit.diagnosis (mn.visit.diagnosis)
[urn, mn.visit.dx.seq.no]
*AA[aa]MDX[mDN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mn.visit.dx.seq.no 2 PINT R mDN
mn.visit.dx 7 FREE L MIS.DIAG *AA[aa]MDX[mDN]|0
mn.visit.dx.name 40 FREE L VAL=@MIS.DIAG.name[@mn.visit.dx[mn.visit.dx.seq.no]]$4
VAL=0
Ì € i 2
adm.pat.moved.from (moved.from)
[urn, mf.number]
*AA[aa]MF[aaMN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mf.number 2 PINT R aaMN
mfacct.number 12 FREE L *AA[aa]MF[aaMN]|1
mfurn 30 URN L *AA[aa]MF[aaMN]|0
Ì € i 2
adm.pat.occurences (occurences)
[urn, occur.seq.no]
*AA[aa]O[aaON]
Field Name Len Dat Typ J DPM Offset/Local/VAL
occur.seq.no 1 PINT R aaON
occur.date 8 DATE L *AA[aa]O[aaON]|1
occur.time 4 HHMM L *AA[aa]O[aaON]|2
occur.type 10 FREE L MIS.ACCID.TYPE *AA[aa]O[aaON]|0
Ì € i 2
adm.pat.other.outpat.locations (other.locations)
[urn, other.location]
*AA[aa]OL[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
other.location 10 FREE L MIS.LOCN.DICT ggn
Ì € i 2
adm.pat.other.names (other.names)
[urn, other.name]
*AA[aa]ON[aaON]
Field Name Len Dat Typ J DPM Offset/Local/VAL
other.name 30 NAME L aaON
Ì € i 2
other.vendor.account.numbers (ov.acct.nums)
[urn, other.vendor.code]
*AA[aa]OV[ov]
Field Name Len Dat Typ J DPM Offset/Local/VAL
other.vendor.code 15 FREE L ov
other.vendor.acct 20 FREE L *AA[aa]OV[ov]|0
Ì € i 2
adm.pat.recur.visit.dates (recur.dates)
[urn, recur.date,recur.time]
*AA[aa]RCR[aaRD,aaRT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
recur.date 8 DATE L aaRD
recur.time 4 HHMM L aaRT
recur.bed.begin.date 8 DATE L *AA[aa]RCR[aaRD,aaRT]|2
recur.bed.begin.time 4 HHMM L *AA[aa]RCR[aaRD,aaRT]|4
recur.bed.end.date 8 DATE L *AA[aa]RCR[aaRD,aaRT]|3
recur.bed.end.time 4 HHMM L *AA[aa]RCR[aaRD,aaRT]|5
recur.locn 10 FREE L MIS.LOCN.DICT *AA[aa]RCR[aaRD,aaRT]|1
recur.user 10 FREE L MIS.USER *AA[aa]RCR[aaRD,aaRT]|0
Ì € i 2
adm.pat.recur.visit.other.locs (recur.dates.loc)
[urn,recur.date,recur.time, rcr.other.location]
*AA[aa]RCR[aaRD,aaRT]L[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rcr.other.location 10 FREE L MIS.LOCN.DICT ggn
Ì € i 2
adm.pat.rugs.codes (rugs.codes)
[urn, rug.date]
*AA[aa]RUG[rdate]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rug.date 8 DATE L rdate
rug.code.mcr.w.modifier 5 FREE L VAL=@rug.code.medicare_@rug.modifier.mcr
rug.code.medicaid 3 FREE L MIS.RUGS.DICT *AA[aa]RUG[rdate]|1
rug.code.medicare 3 FREE L MIS.RUGS.DICT *AA[aa]RUG[rdate]|0
rug.mds.ref.date 8 DATE L *AA[aa]RUG[rdate]|3
rug.mds.urn 8 FREE L *AA[aa]RUG[rdate]|2
rug.modifier.mcr 2 FREE L *AA[aa]RUG[rdate]|4
Ì € i 2
adm.pat.schedule.notes (schedule.notes)
[urn, sched.note.line]
*AA[aa]SN[aaSN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sched.note.line 3 PINT R aaSN
sched.note.text 79 FREE L *AA[aa]SN[aaSN]
Ì € i 2
adm.pat.er.dx.fields (zcus.er.diagnosis)
[urn, zcus.er.dx.counter]
*AA[aa]ZCUSERD[erdc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.er.dx.counter 2 FREE L erdc
zcus.er.at.site 10 FREE L MIS.ZCUS.ANATOM*AA[aa]ZCUSERD[erdc]|2
zcus.er.at.site.side 15 CHOICE L *AA[aa]ZCUSERD[erdc]|4
zcus.er.at.site.sub 10 FREE L *AA[aa]ZCUSERD[erdc]|3
zcus.er.dx 10 FREE L MIS.ZCUS.DIAG *AA[aa]ZCUSERD[erdc]|0
zcus.er.dx.1 10 FREE L VAL=@zcus.er.dx[1]
zcus.er.dx.sub 10 FREE L MIS.ZCUS.SUB.DX*AA[aa]ZCUSERD[erdc]|1
zcus.er.dx.sub.1 10 FREE L VAL=@zcus.er.dx.sub[1]
Ì € i 2
adm.pat.er.investigation (zcus.er.investigations)
[urn, zcus.er.invest.counter]
*AA[aa]ZCUSERI[eric]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.er.invest.counter 2 FREE L eric
zcus.er.invest 10 FREE L MIS.ZCUS.INVEST*AA[aa]ZCUSERI[eric]|0
zcus.er.invest.1 10 FREE L VAL=@zcus.er.invest[1]
zcus.er.invest.sub 10 FREE L MIS.ZCUS.SUB.IV*AA[aa]ZCUSERI[eric]|1
zcus.er.invest.sub.1 10 FREE L VAL=@zcus.er.invest.sub[1]
Ì € i 2
adm.pat.er.tracking.fields (zcus.er.tracking)
[urn, zcus.er.track.counter]
*AA[aa]ZCUSERK[ertk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.er.track.counter 2 FREE L ertk
zcus.er.track.comment 50 FREE L *AA[aa]ZCUSERK[ertk]|2
zcus.er.track.location 10 FREE L MIS.ZCUS.AELOC *AA[aa]ZCUSERK[ertk]|0
zcus.er.track.time 4 HHMM L *AA[aa]ZCUSERK[ertk]|1
Ì € i 2
adm.pat.er.treatments (zcus.er.treatments)
[urn, zcus.er.treatment.counter]
*AA[aa]ZCUSERT[ertc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.er.treatment.counter 2 FREE L ertc
zcus.er.treat.1 10 FREE L VAL=@zcus.er.treatment[1]
zcus.er.treat.sub.1 10 FREE L VAL=@zcus.er.treatment.sub[1]
zcus.er.treatment 10 FREE L MIS.ZCUS.TREAT *AA[aa]ZCUSERT[ertc]|0
zcus.er.treatment.sub 10 FREE L MIS.ZCUS.SUB.TR*AA[aa]ZCUSERT[ertc]|1
Ì € i 2
zcus.facility.transfer (zcus.fac.xfer)
[urn, zcus.facility]
*AA[aa]ZCUSFAC[gqb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.facility 10 FREE L MIS.FACILITY gqb
zcus.facility.acct.no 12 FREE L *AA[aa]ZCUSFAC[gqb]|0
Ì € i 2
link.to.resource.scheduling (zcus.resource.sch)
[urn, zcus.res.sch.counter]
*AA[aa]ZCUSRES[spac]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.res.sch.counter 10 FREE L spac
zcus.res.sch.date 10 FREE L *AA[aa]ZCUSRES[spac]|0
zcus.res.sch.time 10 FREE L *AA[aa]ZCUSRES[spac]|1
Ì € i 2
zcus.uk.pt.addr.change (zcus.uk.pt.addr.change)
[urn, zcus.uk.pt.addr.count]
*AA[aa]ZCUSADX[zpad]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.pt.addr.count 3 FREE L zpad
zcus.uk.pt.addr.chg.date 8 DATE L *AA[aa]ZCUSADX[zpad]|9
zcus.uk.pt.addr.cty 20 FREE L *AA[aa]ZCUSADX[zpad]|3
zcus.uk.pt.addr.date 8 DATE L *AA[aa]ZCUSADX[zpad]|5
zcus.uk.pt.addr.district 10 FREE L *AA[aa]ZCUSADX[zpad]|8
zcus.uk.pt.addr.local 20 FREE L *AA[aa]ZCUSADX[zpad]|1
zcus.uk.pt.addr.pcode 10 ZIP.POST L MIS.ZIP *AA[aa]ZCUSADX[zpad]|4
zcus.uk.pt.addr.street 30 FREE L *AA[aa]ZCUSADX[zpad]|0
zcus.uk.pt.addr.town 20 FREE L *AA[aa]ZCUSADX[zpad]|2
zcus.uk.pt.addr.type 1 FREE L *AA[aa]ZCUSADX[zpad]|7
zcus.uk.pt.addr.user 10 FREE L MIS.USER *AA[aa]ZCUSADX[zpad]|6
Ì € i 2
zcus.uk.pt.reg.gp.change (zcus.uk.pt.reg.gp.change)
[urn, zcus.uk.pt.reg.gp.count]
*AA[aa]ZCUSGPX[zrgp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.uk.pt.reg.gp.count 3 FREE L zrgp
zcus.uk.pt.reg.gp.chg.dt 8 DATE L *AA[aa]ZCUSGPX[zrgp]|4
zcus.uk.pt.reg.gp.date 8 DATE L *AA[aa]ZCUSGPX[zrgp]|1
zcus.uk.pt.reg.gp.id 10 FREE L MIS.DOC.DICT *AA[aa]ZCUSGPX[zrgp]|0
zcus.uk.pt.reg.gp.type 1 FREE L *AA[aa]ZCUSGPX[zrgp]|3
zcus.uk.pt.reg.gp.user 10 FREE L MIS.USER *AA[aa]ZCUSGPX[zrgp]|2
Ì i 2
adm.mri.pointer (mri.pointer)
[mp.urn,mp.visit.date]
:AAMP[aa,aaVD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mp.urn 30 URN L ADM.PAT aa
mp.visit.date 8 DATE L aaVD
mp.acct.num 12 FREE L :AAMP[aa,aaVD]|1
mp.mri.urn 25 URN L MRI.PAT :AAMP[aa,aaVD]|0
mp.visit.type 3 FREE L :AAMP[aa,aaVD]|2
Ì i 2
adm.order.entry.data (oe.data)
[oe.urn]
*AA.OE[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.urn 10 URN L aa
oe.admit.date 8 FREE L VAL=%Z.date.out(@p.admit.date)
oe.age.and.sex 10 FREE L VAL=(%Z.age(@p.computed.birthdate)_" "_@p.sex)
oe.bed 10 FREE L VAL=@p.bed
oe.location 10 FREE L VAL=@p.location
oe.name 30 FREE L VAL=@p.name
oe.pt 43 FREE L
oe.room 10 FREE L VAL=@p.room
oe.screen 0 FREE L VAL=(IF{z.new %MIS.SCREEN.kernel(z.new,^/AA.OE[oe.urn]
VAL=R,"","",7,0,"ND0")}&"")
oe.status 10 FREE L VAL=@p.status
oe.unit.number 8 FREE L VAL=@p.unit.number
temporary.location 10 FREE L MIS.LOCN.DICT *AA.OE[aa]|0
Ì i 2
adm.pat.rcr.revisit.file (rcr.rev.file)
[rcr.rev.file.batch.date]
?AA.RCR[aarBD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rcr.rev.file.batch.date 8 DATE L aarBD
rcr.rev.file.close 1 YN L VAL=IF{/.RCR.FILE="Y" C(?U)},""^/.RCR.FILE,"Y"
rcr.rev.file.last.counter 4 INT R ?AA.RCR[aarBD]|3
rcr.rev.file.open 1 YN L VAL=IF{/.RCR.FILE;%ADM.PAT.rcr.rev.file.open("")}
rcr.rev.file.process.date 8 DATE L ?AA.RCR[aarBD]|5
rcr.rev.file.processed 1 YN L ?AA.RCR[aarBD]|2
rcr.rev.file.ready 1 YN L ?AA.RCR[aarBD]|0
rcr.rev.file.started 1 YN L ?AA.RCR[aarBD]|1
rcr.rev.file.status 10 FREE L VAL=IF{@rcr.rev.file.processed="Y" "PROCESSED";@rcr.re
VAL=v.file.started="Y" "STARTED";@rcr.rev.file.ready="
VAL=Y" "READY";"<UNKNOWN>"}
rcr.rev.file.user 10 FREE L MIS.USER ?AA.RCR[aarBD]|4
rcr.rev.ptct.batch.num 4 PINT R VAL=@rcr.rev.file.batch.date#"1."
rcr.rev.ptct.file.date 8 DATE L VAL=@rcr.rev.file.batch.date#"0."
Ì € i 2
adm.pat.rcr.rev.file.revisits (rcr.rev.file.revisits)
[rcr.rev.file.batch.date, rcr.rev.counter]
?AA.RCR[aarBD]V[aarC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rcr.rev.counter 4 PINT R aarC
dept.mnemonic 10 FREE L MIS.LOCN.DICT ?AA.RCR[aarBD]V[aarC]RPT|0
dictated.by 10 FREE L ?AA.RCR[aarBD]V[aarC]RPT|4
dictated.date.time 12 FREE L ?AA.RCR[aarBD]V[aarC]RPT|5
rcr.rev.account 12 FREE L ?AA.RCR[aarBD]V[aarC]|4
rcr.rev.adm.urn 30 URN L ADM.PAT ?AA.RCR[aarBD]V[aarC]|3
rcr.rev.asmnt.code 2 PINT R ?AA.RCR[aarBD]V[aarC]PPS|6
rcr.rev.asmnt.date 8 DATE L ?AA.RCR[aarBD]V[aarC]PPS|5
rcr.rev.asmnt.dx1 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|9
rcr.rev.asmnt.dx2 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|10
rcr.rev.asmnt.dx3 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|11
rcr.rev.asmnt.dx4 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|12
rcr.rev.asmnt.dx5 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|13
rcr.rev.asmnt.dx6 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|14
rcr.rev.asmnt.dx7 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|15
rcr.rev.asmnt.dx8 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|16
rcr.rev.del.flag 1 FREE L ?AA.RCR[aarBD]V[aarC]|7
rcr.rev.eoc 8 DATE L ?AA.RCR[aarBD]V[aarC]PPS|2
rcr.rev.hhrg 6 FREE L ?AA.RCR[aarBD]V[aarC]PPS|0
rcr.rev.hipps 5 FREE L ?AA.RCR[aarBD]V[aarC]PPS|8
rcr.rev.locn 10 FREE L MIS.LOCN.DICT ?AA.RCR[aarBD]V[aarC]|2
rcr.rev.msa 8 PINT R ?AA.RCR[aarBD]V[aarC]PPS|3
rcr.rev.oasis.key 10 FREE L ?AA.RCR[aarBD]V[aarC]PPS|7
rcr.rev.reject 20 FREE L ?AA.RCR[aarBD]V[aarC]|6
rcr.rev.scic 1 YN L ?AA.RCR[aarBD]V[aarC]PPS|4
rcr.rev.soc 8 DATE L ?AA.RCR[aarBD]V[aarC]PPS|1
rcr.rev.status 1 CHOICE L ?AA.RCR[aarBD]V[aarC]|5
rcr.rev.svc.date 8 DATE L ?AA.RCR[aarBD]V[aarC]|0
rcr.rev.svc.time 4 HHMM L ?AA.RCR[aarBD]V[aarC]|1
rpt.file.reject 20 FREE L ?AA.RCR[aarBD]V[aarC]RPT|9
rpt.file.status 1 CHOICE L ?AA.RCR[aarBD]V[aarC]RPT|8
rpt.id 10 FREE L ?AA.RCR[aarBD]V[aarC]RPT|3
rpt.mnemonic 10 FREE L ?AA.RCR[aarBD]V[aarC]RPT|1
rpt.status 9 FREE L ?AA.RCR[aarBD]V[aarC]RPT|2
transcribed.by 10 FREE L ?AA.RCR[aarBD]V[aarC]RPT|6
transcribed.date.time 12 FREE L ?AA.RCR[aarBD]V[aarC]RPT|7
Ì € i 2
adm.pat.rcr.rev.file.rej.req (rcr.rev.file.rej.req.flds)
[rcr.rev.file.batch.date,rcr.rev.counter, rcr.rev.rej.req.fld.cntr]
?AA.RCR[aarBD]V[aarC]X[aarVX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rcr.rev.rej.req.fld.cntr 4 PINT R aarVX
rcr.rev.rej.req.field 50 FREE L ?AA.RCR[aarBD]V[aarC]X[aarVX]
Ì € i 2
adm.pat.rcr.rev.file.rpt.lines (rcr.rev.file.rpt.lines)
[rcr.rev.file.batch.date,rcr.rev.counter, line.seq.no]
?AA.RCR[aarBD]V[aarC]RPT[txtCT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
line.seq.no 4 PINT R txtCT
Ì i 2
adm.pat.reinstate (reinstate)
[reinstate.facility,reinstate.time,reinstate.user]
*AARL[gqb,aaRT,gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reinstate.facility 10 FREE L MIS.FACILITY gqb
reinstate.time 9 DATE L aaRT
reinstate.user 10 FREE L MIS.USER gu
reinstate.status 40 FREE L *AARL[gqb,aaRT,gu]|0
Ì € i 2
ADM.PAT.reinstated.acct (reinstate.acct)
[reinstate.facility,reinstate.time,reinstate.user, reinstated.account]
*AARL[gqb,aaRT,gu,aaA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reinstated.account 12 FREE L aaA
reinstated.msg 80 FREE L *AARL[gqb,aaRT,gu,aaA]|4
reinstated.orig.date 8 DATE L *AARL[gqb,aaRT,gu,aaA]|1
reinstated.orig.time 4 HHMM L *AARL[gqb,aaRT,gu,aaA]|2
reinstated.status 9 FREE L *AARL[gqb,aaRT,gu,aaA]|0
reinstated.warning 80 FREE L *AARL[gqb,aaRT,gu,aaA]|3
Ì i 2
adm.pat.save.bad.rcr.hhrg (sv.hhrg)
[sv.hhrg.patient]
*AA.HHRG[aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sv.hhrg.patient 30 URN L ADM.PAT aa
sv.hhrg.pt.acct.no 12 FREE L *AA.HHRG[aa]|1
sv.hhrg.pt.name 30 FREE L *AA.HHRG[aa]|0
sv.hhrg.pt.visit.date 8 DATE L *AA.HHRG[aa]|2
Ì € i 2
adm.pat.save.bad.rcr.hhrg.det (sv.hhrg.detail)
[sv.hhrg.patient, sv.hhrg.asmnt.date]
*AA.HHRG[aa]D[aaHSD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sv.hhrg.asmnt.date 14 PINT R aaHSD
sv.hhrg.asmnt.code 2 PINT R *AA.HHRG[aa]D[aaHSD]|4
sv.hhrg.code 10 FREE L MIS.HHRG.DICT *AA.HHRG[aa]D[aaHSD]|1
sv.hhrg.eoc 8 DATE L *AA.HHRG[aa]D[aaHSD]|0
sv.hhrg.hipps 5 FREE L *AA.HHRG[aa]D[aaHSD]|6
sv.hhrg.msa 10 FREE L MIS.MSA.DICT *AA.HHRG[aa]D[aaHSD]|2
sv.hhrg.oasis.key 18 FREE L *AA.HHRG[aa]D[aaHSD]|5
sv.hhrg.soc 8 DATE L *AA.HHRG[aa]D[aaHSD]|3
Ì i 2
adm.pat.xfer.queue (xfer.queue)
[xfer.seconds,xfer.type,xfer.urn]
:AAXQ[xsec,xch,aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xfer.seconds 9 FREE L xsec
xfer.type 10 CHOICE L xch
xfer.urn 30 URN L ADM.PAT aa
xfer.acct.number 12 FREE L :AAXQ[xsec,xch,aa]
xfer.appl.urn 20 FREE L
xfer.cds.skip.emr 1 YN L :AAXQ[xsec,xch,aa]SEMR
xfer.confid.flag.changed 1 YN L :AAXQ[xsec,xch,aa]|6
xfer.dre.abs.ignore 1 YN L :AAXQ[xsec,xch,aa]|5
xfer.dre.acct 12 FREE L :AAXQ[xsec,xch,aa]|3
xfer.dre.adm.urn 30 URN L ADM.PAT :AAXQ[xsec,xch,aa]|4
xfer.dre.db 12 FREE L MIS.APPL :AAXQ[xsec,xch,aa]|2
xfer.dre.from.appl 12 FREE L MIS.APPL :AAXQ[xsec,xch,aa]|7
xfer.height.centimeters 3 PINT R :AAXQ[xsec,xch,aa]NSC|2
xfer.height.feet 1 PINT R :AAXQ[xsec,xch,aa]NSC|0
xfer.height.inches 2 PINT R :AAXQ[xsec,xch,aa]NSC|1
xfer.iv 60 FREE L :AAXQ[xsec,xch,aa]NSC|6
xfer.job 3 INT R
xfer.mri.user 10 FREE L MIS.USER :AAXQ[xsec,xch,aa]|6
xfer.new.acct.number 12 FREE L :AAXQ[xsec,xch,aa]|0
xfer.new.mri.urn 25 URN L MRI.PAT :AAXQ[xsec,xch,aa]|1
xfer.new.other.number 11 FREE L :AAXQ[xsec,xch,aa]|4
xfer.new.unit.number 10 FREE L :AAXQ[xsec,xch,aa]|0
xfer.new.web.id 25 FREE L :AAXQ[xsec,xch,aa]|0
xfer.new.web.id.urn 25 FREE L :AAXQ[xsec,xch,aa]|2
xfer.new.web.id.urn.type 1 CHOICE L :AAXQ[xsec,xch,aa]|1
xfer.nsc.user 10 FREE L MIS.USER :AAXQ[xsec,xch,aa]NSC|9
xfer.o2 60 FREE L :AAXQ[xsec,xch,aa]NSC|7
xfer.old.acct.number 12 FREE L :AAXQ[xsec,xch,aa]|1
xfer.old.mri.urn 25 URN L MRI.PAT :AAXQ[xsec,xch,aa]|3
xfer.old.other.number 11 FREE L :AAXQ[xsec,xch,aa]|5
xfer.old.unit.number 10 FREE L :AAXQ[xsec,xch,aa]|2
xfer.old.web.id 25 FREE L :AAXQ[xsec,xch,aa]|3
xfer.old.web.id.urn 25 FREE L :AAXQ[xsec,xch,aa]|5
xfer.old.web.id.urn.type 1 CHOICE L :AAXQ[xsec,xch,aa]|4
xfer.switch.acct.number 12 FREE L :AAXQ[xsec,xch,aa]|4
xfer.transportation 60 FREE L :AAXQ[xsec,xch,aa]NSC|8
xfer.value 12 FREE L :AAXQ[xsec,xch,aa]
xfer.weight.kilograms 5 DEC R :AAXQ[xsec,xch,aa]NSC|5
xfer.weight.ounces 2 PINT R :AAXQ[xsec,xch,aa]NSC|4
xfer.weight.pounds 3 PINT R :AAXQ[xsec,xch,aa]NSC|3
Ì i 2
zcus.er.letter.files (zcus.er.letter.files)
[zcus.lf.urn]
*AAZCUSFI[lu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.lf.urn 6 PINT R lu
zcus.lf.compile.status 10 CHOICE L *AAZCUSFI[lu]|4
zcus.lf.created.by 10 FREE L MIS.USER *AAZCUSFI[lu]|3
zcus.lf.date.created 8 DATE L *AAZCUSFI[lu]|1
zcus.lf.halt.type 30 CHOICE L *AAZCUSFI[lu]|5
zcus.lf.letter 10 FREE L *AAZCUSFI[lu]|6
zcus.lf.not.in.use.yet 0 CHOICE L *AAZCUSFI[lu]|0
zcus.lf.time.created 8 TIME L *AAZCUSFI[lu]|2
Ì € i 2
zcus.er.letter.accts (zcus.er.letter.accts)
[zcus.lf.urn, zcus.lf.letter.unit,zcus.lf.letter.adm.urn,zcus.lf.letter.ltr]
*AAZCUSFI[lu]ZCUSA[eeN,aa,gzl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.lf.letter.unit 10 FREE L eeN
zcus.lf.letter.adm.urn 10 FREE L aa
zcus.lf.letter.ltr 10 FREE L gzl
zcus.lf.letter.processed 1 YN L *AAZCUSFI[lu]ZCUSA[eeN,aa,gzl]|0
Ì i 2
zcus.temp.1 (zcus.temp.1)
[zcus.temp.1.1]
/AAZCUSTEMP[tmp1]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.temp.1.1 10 FREE L tmp1
Ì i 2
zcus.temp.2 (zcus.temp.2)
[zcus.temp.2.1,zcus.temp.2.2]
/AAZCUSTEMP[tmp1,tmp2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.temp.2.1 10 FREE L tmp1
zcus.temp.2.2 10 FREE L tmp2
Ì i 2
zcus.temp.3 (zcus.temp.3)
[zcus.temp.3.1,zcus.temp.3.2,zcus.temp.3.3]
/AAZCUSTEMP[tmp1,tmp2,tmp3]
Field Name Len Dat Typ J DPM Offset/Local/VAL
zcus.temp.3.1 10 FREE L tmp1
zcus.temp.3.2 10 FREE L tmp2
zcus.temp.3.3 10 FREE L tmp3
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
adm.pat.acct.number.index [acct.number] = urn
acct.index :AAAI[aaA]
adm.pat.activity.index [date,urn]
activity.index :AAAX[aaDT,aa]
adm.pat.registration.index [facility,status.type,date,time,urn]
adm.reg.index :AAEI[gqb,aaST,aaDT,aaTM,aa]
adm.pat.ansi.elig.inquiry.x [elig.txn.trace.num,elig.account,elig.ins]
ansi.elig.inq.x :AA.EDIIX[trace,aa,ggm]
adm.pat.ansi.elig.response.x [elig.account,elig.ins,elig.txn.trace.num]
ansi.elig.resp.x :AA.EDIRX[aa,ggm,trace]
adm.pat.bad.acct.num.index [acct.number]
bad.acct.num.index :AABI[aaA]
adm.pat.convert.ccdqr.x [urn,ccdqr.query] = ccdqr.response
convert.ccdqr.x :AACCQC[aa,ggv]
adm.pat.convert.cd.x [urn,cd.query] = cd.response
convert.cd.x :AACDQC[aa,ggv]
adm.pat.convert.insq.x [urn,insurance,ins.cd.query] = ins.cd.response
convert.insq.x :AAIQC[aa,ggm,ggv]
adm.pat.deleted.acct.index [facility,date,time,urn]
delete.index :AADX[gqb,aaDT,aaTM,aa]
adm.pat.dis.activity.index [event.date,urn]
dis.activity.index :AADA[evdt,aa]
adm.pat.discharge.index [facility,discharge.date,discharge.time,urn]
discharge.index :AADI[gqb,aaDDT,aaDTM,aa]
adm.pat.doctor.index [doctor,urn]
doctor.index :AADF[ggg,aa]
adm.pat.exception.index [facility,event.date,time,urn,event.seq.no]
except.reg :AAEX[gqb,evdt,aaTM,aa,aev]
adm.pat.guarantor.name.index [last.name,first.name,guar.soc.sec.number,adm.or.mri.urn]
guar.name.index :AAGN[aaLN,aaFN,aGSS,aaea]
adm.pat.guar.soc.sec.index [guar.soc.sec.number,urn]
guar.ss.index :AAGI[aGSS,aa]
adm.pat.hold.from.purge.index [urn,delete.date,MIS.APPL.database,appl.urn]
hold.x *AADLT[aa,dd,iaD,au]
ins.ver.acct.status.chg.index [ins.vlog.account,ins.vlog.ins,ins.vlog.user,ins.vlog.date]
ins.ver.acct.status.log.x :AAISLX[aa,ggm,gu,aaslD]
adm.pat.ins.verify.worklist.x [insurance,ins.v.status,ins.v.status.date,MIS.INS.VER.process,urn]
ins.ver.worklist.x :AAIVW[ggm,aaIS,aaISD,gimT,aa]
adm.pat.mri.urn.x [mri.urn,urn]
mri.urn.x *AAMX[ea,aa]
adm.pat.name.index [last.name,first.name,urn] = facility
name.index :AANI[aaLN,aaFN,aa]
adm.pat.newborn.index [mothers.urn,urn]
newborn.x :AANBI[aa,aa]
adm.pat.nurse.census.index [facility,date,room,bed,urn]
nursing.census.index :AAFI[gqb,aaDT,ggr,ggrB,aa]
adm.pat.outpat.exception.index [facility,event.date,time,urn,event.seq.no]
out.except.reg :AAEO[gqb,evdt,aaTM,aa,aev]
outpatient.location.index [facility,date,location,urn]
outpatient.location.x :AALI[gqb,aaDT,ggn,aa]
other.vendor.acct.number.index [other.vendor.code,other.vendor.acct] = urn
ov.acct.x :AAOVI[ov,aaOV]
adm.pat.prim.care.doctor.index [prim.care.doctor,urn]
prim.care.doctor.index :AAPCD[ggg,aa]
adm.pat.rcr.discharge.index [facility,recur.discharge.date,urn]
rcr.discharge.index :AADR[gqb,aRDT,aa]
adm.pat.room.bed.index [facility,room,bed] = urn
room.bed.index :AARB[gqb,ggr,ggrB]
adm.pat.schedule.index [facility,status.type,date,urn]
schedule.index :AASI[gqb,aaST,aaDT,aa]
adm.pat.transfer.index [facility,date,time,urn,event.date,event.seq.no]
transfer.index :AATI[gqb,aaDT,aaTM,aa,evdt,aev]
adm.pat.unit.number.index [unit.number,urn]
unit.index :AAUI[aaU,aa]
capscan.error.x [urn] = zcus.error.code
zcus.capscan.error.x :AAZCUS.CAP[aa]
patient.leave.index [facility,zcus.leave.room,zcus.leave.bed,urn] = urn
zcus.leave.index :AAZCUSLI[gqb,ggr,ggrB,aa]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |